A capacidade de consulta de outros que o que você está usando atualmente bases de dados pode fazer o seu pedido de acesso mais dinâmico , você pode fazer isso usando o Visual Basic for Applications (VBA). No VBA , você pode usar o método " OpenDatabase " para definir o caminho eo nome do banco de dados que você deseja consultar. Depois de definir o banco de dados , você pode usar o objeto " registros " para exibir os resultados da consulta. Coisas que você precisa
Adamastor 2007 banco de dados
Show Mais instruções
1

Inicie Access 2007 , clique em "Banco de Dados em Branco " e , em seguida, clique no botão "Criar" . Selecione "Ferramentas de Banco de Dados " e clique em "Visual Basic".
2

Crie um novo procedimento , digitando o seguinte código: Private Sub

QueryDataBase ()

3

Crie três novas variáveis ​​ao escrever o seguinte código VBA:

Dim rst Como Recordset

Dim dbs as Database

Dim sqlstr as String < br >
4

Defina o banco de dados que você irá consultar digitando o seguinte código:

Set dbs = OpenDatabase ( "C: \\ Adamastor 2007.accdb " )
5

Criar uma string SQL , digitando o seguinte código para criar uma consulta :

sqlstr = " . . SELECT Orders [ Navio Name] , ordens [ Navio Endereço ]"

sqlstr = sqlstr & "FROM Orders"

sqlstr = sqlstr & " . . GROUP BY ordens [ Navio Name] , ordens [ Navio Endereço ]; "
6

Copie e cole o seguinte código para abrir a consulta por meio de um " conjunto de registros " e exibir os resultados para a janela imediata :

Set rst = dbs.OpenRecordset ( sqlstr )

rst.MoveLast

rst.MoveFirst

Do While Not rst.EOF

Debug.Print rst.Fields ( " Navio Name") . Valor

Debug.Print rst.Fields ( "Endereço do navio " ) . valor

rst.MoveNext

loop
7

Termine o seu procedimento , digitando o seguinte código:

rst.Close

dbs.Close

End Sub