16,554
社区成员
发帖
与我相关
我的任务
分享
REM 示例代码:
Dim r As New AMReport.AmReport
Dim app As New Microsoft.Office.Interop.Excel.Application
Dim book As Microsoft.Office.Interop.Excel.Workbook
Dim sheet As Microsoft.Office.Interop.Excel.Worksheet
book = app.Workbooks.Add
sheet = book.Worksheets(1)
app.Visible = True
r.Export(sheet, "F:\newOpt.opt") ' F:\newOpt.opt 用代码生成器生成的配置文件
book = Nothing
app = Nothing