La posibilidad de consultar las bases de datos distintas a la que está utilizando puede hacer su solicitud de acceso más dinámico , se puede lograr esto con Visual Basic para Aplicaciones ( VBA) . En VBA , puede utilizar el método de " OpenDatabase " para definir la ruta y el nombre de la base de datos que desea consultar. Después de definir la base de datos , puede utilizar el objeto " registros " para mostrar los resultados de la consulta. Cosas que necesitará
base de datos Northwind 2007
Ver Más instrucciones
1

lanzamiento Access 2007 , haga clic en "Base de datos en blanco ", y luego haga clic en el botón "Crear" . Seleccionar "Herramientas de base de datos" y haga clic en "Visual Basic ".
2

Crear un nuevo procedimiento escribiendo el siguiente código:

queryDatabase Sub Private ()
Página 3

crear tres nuevas variables , escriba el siguiente código de VBA :

rst As Recordset

Dim dbs como base de datos

sqlstr Dim As String < br > Página 4

Definir la base de datos que va a consultar introduciendo el siguiente código:

Set dbs = OpenDatabase ("C: \\ Northwind 2007.accdb ")
5 < p > Crear una cadena SQL , escriba el siguiente código para crear una consulta :

sqlstr = " . . órdenes SELECT [Nombre del barco ] , órdenes [Ship dirección] "

sqlstr = sqlstr y "FROM Orders"

sqlstr = sqlstr & " GROUP BY órdenes [Nombre del barco ], órdenes [Ship Dirección ], . ".
6

Copia y pega el siguiente código para abrir la consulta a través de un " conjunto de registros " y mostrar los resultados en la ventana Inmediato :

Set rst = dbs.OpenRecordset ( sqlstr )

rst.MoveLast

rst.MoveFirst

Do While Not rst.EOF

Debug.Print rst.Fields ( " nave ") . Valor

Debug.Print rst.Fields ( " Ship Dirección ") . Valor

rst.MoveNext

Loop
7

final del procedimiento , escriba el siguiente código:

rst.Close
< p > dbs.Close

End Sub