La programación de Excel VBA De Acceso

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

Instrucciones

Enviar datos a Excel

1 El acceso abierto, a continuación, haga clic en el botón de la pestaña "Desarrollador" "Visual Basic" 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 de control de Excel, a continuación, haga clic en el menú "Herramientas". Haga clic en el comando "de referencia", a continuación, haga clic en la casilla de verificación "Microsoft Excel", de modo que su programa puede acceder a los objetos virtuales de Excel.

3 Pegue el siguiente programa en la ventana. Este programa crea un libro de Excel, a continuación, inserta texto en una de las células del libro.

Public Sub MadeByAccess ()

Dim aplExcel Como Excel.Application

Establecer 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ú de "Ejecutar" para ejecutar el programa, a continuación, utilice el Explorador de Windows para navegar a la carpeta "C :."

5 Haga doble clic en el archivo "MadeByAccess.xlsx" para cargar ese 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 su programa.

Leer un valor de Excel

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

7 El acceso abierto, a continuación, haga clic en el botón de la pestaña "Desarrollador" "Visual Basic" para entrar en el entorno de programación Visual Basic.

8 Haga clic en el comando "de referencia" de la "Herramientas" del menú, a continuación, haga clic en la casilla de verificación del tema "Microsoft Excel" para habilitar el programa para controlar Excel.

9 Haga clic en el comando "Módulo" del menú "Insertar", a continuación, pegue 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 ForAccess ()

Dim aplExcel Como Excel.Application

Establecer aplExcel = CreateObject ( "Excel.Application")

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

MsgBox aplExcel.ActiveCell

aplExcel.ActiveWorkbook.Close

aplExcel.Quit

End Sub

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