Cómo guardar una consulta sobre el acceso VBA

Conocer cómo guardar una consulta utilizando Visual Basic para aplicaciones en Microsoft Access le pueden ahorrar tiempo al crear varias consultas. El acceso es una aplicación de base de datos relacional se utiliza principalmente para pequeñas bases de datos locales. VBA fue desarrollado por Microsoft y que comúnmente se utiliza para automatizar tareas rutinarias dentro de las aplicaciones de Microsoft Office. En Access, una consulta de VBA se utiliza para abrir una tabla o tablas para acceder a sus datos para su posterior manipulación.

Instrucciones

1 Haga clic en "Herramientas de base de datos" en Microsoft Access 2007 y seleccione "Visual Basic" para abrir la ventana de Visual Básico Microsoft. Haga clic en el menú "Insertar" y seleccione "módulo" para crear "Module 1".

2 Tipo "myVBAQuery Public Sub" y presionar "Enter" para crear una nueva subrutina.

Escribe lo siguiente para declarar sus variables:

Dim como secuencia strSQL

DBS dévil como Base de Datos

Dim primera medida de registros

Dim rstCnt como número entero

3 Escribe lo siguiente para definir la consulta y abra el conjunto de registros:

Set dbs = CurrentDb

strSQL = "SELECT * FROM Tabla1 Tabla1;".

Establecer primera = dbs.OpenRecordset (strSQL)

4 Escriba lo siguiente para recorrer el conjunto de registros a mostrar los datos almacenados en el campo "1" en la tabla:

rst.MoveFirst

Para rstCnt = 0 Para rst.RecordCount

MsgBox rst.Fields(1).Value

rst.MoveNext

Siguiente rstCnt

Pulse la tecla "Ctrl + S" para guardar la subrutina en "Module 1" y estará disponible para su uso en el futuro.