帮助里写Dim myExportObject As ActiveReportsExcelExport.ARExportExcel,但我使用时没有ActiveReportsExcelExport.ARExportExcel这些属性调出来呀。我用的是ActiveReports Professional 2
工程-->引用-->ActiveReports Excel Export FilterPrivate Sub ActiveReport_ReportEnd() Dim xls As New ActiveReportsExcelExport.ARExportExcel xls.FileName = "c:\book1.xsl" xls.Export Me.Pages End Sub
Dim xls As New ActiveReportsExcelExport.ARExportExcel
xls.FileName = "c:\book1.xsl"
xls.Export Me.Pages
End Sub