Visual Basic - Exportar a Excel

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil
Val: 7
Ha aumentado su posición en 3 puestos en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

Exportar a Excel

Publicado por Ana (106 intervenciones) el 26/03/2003 15:53:28
Hola, a ver si me podeis ayudar.
Tengo una aplicación desarrollada en Access bajo código VBA, y tengo que hacer una consulta exportarla a una hoja de cálculo Excel, por código VB.
¿Me podeis ayudar? Lo necesito con urgencia, y no sé cómo hacerlo por código.
Si me podeis pasar algún código o ejemplo, os lo agradecería.
Gracias de antemano.
Salu2 !!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Exportar a Excel

Publicado por Giovanni Barajas (16 intervenciones) el 26/03/2003 23:35:30
Hola, la verdad es facil hacer lo que tu dices.
Desde access crea una macro
selecciona Transferir Hoja de cálculo
tipo de transferencia: exportar
llenas el resto de informacion como nombre de la tabla o consulta que deseas exportar, nombre del archivo de exel (el que se va a crear)
y guardas la macro y la cierras

Luego en el menu herramientas/macro seleccionas convertir macros a visual basic

Luego vas hasta modulos y ahí estan guardadas las macros en condigo vba.

el resultado es algo como esto:

Option Compare Database

'------------------------------------------------------------
' Macro11
'
'------------------------------------------------------------
Function Macro11()
On Error GoTo Macro11_Err

DoCmd.TransferSpreadsheet acExport, 8, "TABLA_ADMISIONES", "ARCHIVO_ADMISIONES", True, ""

Macro11_Exit:
Exit Function

Macro11_Err:
MsgBox Error$
Resume Macro11_Exit

End Function

en donde la línea importante es
DoCmd.TransferSpreadsheet acExport, 8, "TABLA_ADMISIONES", "ARCHIVO_ADMISIONES", True, ""

en este ejemplo
TABLA ADMISIONES es una tabla de la base de datos que quiero exportar
ARCHIVO ADMISIONES es el nombre y ruta del archivo de excel en donde van a quedar los datos de la tabla
8 es la version de excel
true es que el archivo va a tener encabezados de campo es decir el nombre de los campos en la primera línea.

espero te sirva
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Exportar a Excel

Publicado por Giovanni Barajas (16 intervenciones) el 26/03/2003 23:37:57
Hola, la verdad es facil hacer lo que tu dices.
Desde access crea una macro
selecciona Transferir Hoja de cálculo
tipo de transferencia: exportar
llenas el resto de informacion como nombre de la tabla o consulta que deseas exportar, nombre del archivo de exel (el que se va a crear)
y guardas la macro y la cierras

Luego en el menu herramientas/macro seleccionas convertir macros a visual basic

Luego vas hasta modulos y ahí estan guardadas las macros en condigo vba.

el resultado es algo como esto:

Option Compare Database

'------------------------------------------------------------
' Macro11
'
'------------------------------------------------------------
Function Macro11()
On Error GoTo Macro11_Err

DoCmd.TransferSpreadsheet acExport, 8, "TABLA_ADMISIONES", "ARCHIVO_ADMISIONES", True, ""

Macro11_Exit:
Exit Function

Macro11_Err:
MsgBox Error$
Resume Macro11_Exit

End Function

en donde la línea importante es
DoCmd.TransferSpreadsheet acExport, 8, "TABLA_ADMISIONES", "ARCHIVO_ADMISIONES", True, ""

en este ejemplo
TABLA ADMISIONES es una tabla de la base de datos que quiero exportar
ARCHIVO ADMISIONES es el nombre y ruta del archivo de excel en donde van a quedar los datos de la tabla
8 es la version de excel
true es que el archivo va a tener encabezados de campo es decir el nombre de los campos en la primera línea.

espero te sirva
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar