EXPORTAR DE ACCESS A EXCEL CON VBA

Si queremos exportar una consulta de Access directamente a Excel se puede hacer con este comando desde VBA:

DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, “NOMBRE_CONSULTA”, nombre_ARCHIVO, True

DoCmd.TransferSpreadsheet acExport, esta es la orden para exportar a una hoja de calculo.

acSpreadsheetTypeExcel9 , esto identifica la version de excel que vamos a usar para hacer la exportación, el numero final dependera de la version de excel que tengamos instalada en nuestro ordenador.

El “NOMBRE_CONSULTA” sera el nombre de la query que hayamos diseñado previamente en el panel de base de datos de Access.

El nombre_archivo sera la ruta donde queramos guardar el xls, hay que especificar la ruta completa “C:\informes\informe1.xls” , el nombre normalmente se crea con parámetros como el nombre de consulta + la fecha en la cual se hace la exportación.

Actualización: para abrir el archivo resultante podemos usar esta orden (para el caso de Office 2003): 

Shell GetProgFilesPath & “\Microsoft Office\OFFICE11\EXCEL.EXE” & ” ” & nombre_archivo

Te ayudamos a integrar esta solución en tu aplicación de Access