Tecnología

Inicio

Cómo exportar datos de Access con VBA

Es útil saber cómo exportar datos de Microsoft Office Access a otras aplicaciones para su posterior manipulación de los datos. El acceso es un sistema de gestión de base de datos relacional incluido en el paquete de Microsoft Office. Visual Basic para Aplicaciones (VBA) es un lenguaje de programación de Microsoft utilizada para la automatización de tareas en las aplicaciones de Microsoft Office. En unos pocos pasos se puede escribir código VBA para exportar una tabla de Access a un archivo de texto.

Instrucciones

1 Iniciar Access de Microsoft Office 2007 y haga clic en "Base de datos en blanco", a continuación, haga clic en "Crear". Seleccionar "Herramientas de base de datos" y haga clic en "Visual Basic". Seleccione el menú "Insertar" y seleccione "Módulo".

2 Tipo "sub exportAccessData privada" y presionar "Enter" para crear una nueva subrutina.

3 Copia y pega el código siguiente en su nueva subrutina para crear una nueva tabla, agregar cuatro registros a su mesa, y la exportación de datos de una tabla a un archivo de texto.

Dim como secuencia sqlString

sqlString = "CREATE TABLE exportAccessData (TEXTO DE LA CIUDAD, ESTADO DE TEXTO)"

DoCmd.SetWarnings falsos

DoCmd.RunSQL (sqlString)

STRSQL = "INSERT INTO VALORES exportAccessData ( 'Fort Worth', 'TEXAS')"

DoCmd.RunSQL (strsql)

STRSQL = "INSERT INTO VALORES exportAccessData ( 'ARLINGTON', 'TEXAS')"

DoCmd.RunSQL (strsql)

STRSQL = "INSERT INTO VALORES exportAccessData ( 'Los Angeles', 'CALIFORNIA')"

DoCmd.RunSQL (strsql)

STRSQL = "INSERT INTO VALORES exportAccessData ( 'SAN DIEGO', 'CALIFORNIA')"

DoCmd.RunSQL (strsql)

sqlString = "SELECT exportAccessData.CITY, exportAccessData.STATE EN dataToExport"

sqlString = sqlString Y "DE exportAccessData"

sqlString = sqlString & "WHERE (((exportAccessData.STATE) = 'CALIFORNIA'));"

DoCmd.RunSQL (sqlString)

DoCmd.OutputTo acOutputTable, "dataToExport", acFormatTXT, "c: \ dataToExport.txt"

4 Ejecutar la subrutina presionando "F5".