Cómo programar Excel VBA de acceso

La comprensión de cómo el programa Excel VBA de Access permite escribir programas que el intercambio de datos entre las dos aplicaciones. Cada aplicación tiene características que el otro no , pero mediante el uso de lo que Microsoft llama " Automation ", que puede dar a cada programa de las herramientas de VBA y los objetos virtuales de la otra. Los elementos clave de la automatización incluyen los objetos de VBA virtuales de una aplicación , como por ejemplo la recogida de Excel " libros " y la propiedad " ActiveCell " . La declaración VBA que hace que los objetos de Excel disposición de acceso es " CreateObject ". Instrucciones
Enviar datos a Excel
1

Open Access , a continuación, haga click en "Visual Basic " de la pestaña " desarrollador " para entrar en el entorno de desarrollo de Visual Basic .
2

Haga clic en el comando " Módulo " del menú " Insertar" para crear una nueva ventana para mantener su programa para el control de Excel , a continuación, haga clic en el menú " Herramientas". Haga clic en el comando " de referencia" , haga clic en la casilla de verificación " Microsoft Excel " para que el programa puede acceder a los objetos virtuales de Excel.
3

Pega el siguiente programa en la ventana. Este programa crea un libro de Excel , a continuación, el texto se inserta en una de las celdas del libro de trabajo .

Public Sub MadeByAccess ()

aplExcel As Excel.Application

Set aplExcel = CreateObject ( " Excel.Application " )

aplExcel.Workbooks.Add

aplExcel.ActiveCell = " . Hola de acceso"

aplExcel.ActiveWorkbook.SaveAs ("c : \\ MadeByAccess.xlsx " )

aplExcel.Quit

End Sub

4 Haga clic en el comando" ejecutar " " del menú " Run para ejecutar el programa , a continuación, utilizar Windows explorer para navegar a la carpeta "C : \\".
5

Haga doble clic en el archivo " MadeByAccess.xlsx " para cargar el archivo en Excel. Observe que la primera celda de la primera hoja de cálculo muestra el texto de " Hola de acceso ", que apareció en el programa.
Leer un valor a partir Excel
6

Abrir Excel , a continuación, escriba cualquier texto en la celda "A1 " de la primera hoja de cálculo. Pulse el botón " Control" y " S " al mismo tiempo , a continuación, escriba "C: \\ ForAccess.xlsx " en el cuadro de texto "Nombre". Haga clic en " Guardar " y luego presione "Control" y " F4 " simultáneamente para cerrar Excel.
7

Open Access , a continuación, haga clic en " Visual Basic " de la pestaña " desarrollador " para entrar en la programación de Visual Basic medio ambiente.
8

clic comando " de referencia" del menú " Herramientas" , haga clic en la casilla de la opción " Microsoft Excel " para habilitar el programa para el control de Excel.
9 < p > Haga comando " Módulo " del menú "Insertar " y luego pegar el siguiente programa en la nueva ventana que aparece. Este programa se abre el libro de Excel que creó en el paso 1 , y lee la celda " A1 " de ese libro.

Public Sub paraaccess ()

aplExcel As Excel.Application
< p > Establecer aplExcel = CreateObject ( " Excel.Application " )

aplExcel.Workbooks.Open ("c : \\ ForAccess.xlsx " )

MsgBox aplExcel.ActiveCell

aplExcel . ActiveWorkbook.Close

aplExcel.Quit

End Sub
10

clic comando "Ejecutar " del menú " ejecutar" para ejecutar el programa . Access mostrará un cuadro de mensaje que muestra el texto que escribió en la celda de hoja de cálculo Excel en el paso uno .