| Pregunta: | 33278 - EXPORTACION DE ACTIVE REPORT A EXCEL |
| Autor: | Christian Vargas Jaramillo |
| Hola:
Quisiera saber si me pueden ayudar con el Codigo fuente y que referencias deberia agregar a un proyecto de Visual Basic, para realizar una exportacion de un reporte en Active Report a un Documento de Excel, de antemano Muchas Gracias | |
| Respuesta: | Juande Cortes |
| Mira, si tienes la version 2.0 de Active Reports tienes que agregar la siguiente referencia, "ActiveReports Excel Export Filters" y en tu reporte agregas un boton para exportarlo a excel con el siguiente codigo:
Para agregar el boton en tu reporte Private Sub ActiveReport_ReportEnd() Me.Toolbar.Tools.Add ("Exportar") End Sub Para exportar el reporte a Excel Private Sub ActiveReport_ToolbarClick(ByVal tool As DDActiveReports.DDTool) Dim ExpoExcel As ActiveReportsExcelExport.ARExportExcel If tool.Caption = "Exportar" Then ExpoExcel.FileName = "c:\Arcivo a excel.xls" ExpoExcel.Export Reporte.Pages End If End Sub Y es todo. En el caso de que tengas una version anterior al 2 de Active reports, creo que lo unico que puedes hacer es exportar el recordset a excel, o la otra opcion (que es la que yo hice), baja la version demo del active reports 2 y puedes utilizar las referencias sin ningun problema en la version anterior. Espero que te sirva. Si tienes algun problema escribeme. | |