Faça bancos de dados Microsoft Access 2007 mais dinâmica e automatizada com o Editor do Visual Basic ( VBE) . O VBE é o shell de programação incluída no Access que usa Visual Basic for Applications (VBA). Uma das funções do VBA é gerar dados a partir do banco de dados e salvá-lo em um conjunto de registros que podem ser acessados ​​e manipulados no código. Uma vez que você terminar de trabalhar com o conjunto de registros no código, você pode salvá-lo de volta para a tabela que você puxou-o de, ou copiá-lo para outra tabela. Instruções
1

Abra seu banco de dados no Microsoft Access 2007 e abrir o Editor do Visual Basic. Clique na aba "Banco de Dados Ferramentas " e depois " Visual Basic" do grupo " Macros e Código ."
2

Clique no botão " Insert" item de menu no Editor do Visual Basic e , em seguida, clique em "Módulo ". Ou, se você tem um formulário ou módulo anterior que deseja utilizar este procedimento , abra que, ao invés , clicando duas vezes sobre ele a partir da janela Project Explorer no lado esquerdo da tela.
3

Escrever o procedimento que vai puxar o conjunto de registros do banco de dados :

"Sub RecordsetExample ()

Dim dbTest como banco de dados ' a variável que irá realizar o seu banco de dados

Dim rsRecordset como Recordset 'A variável que irá realizar o seu conjunto de registros

Definir dbTest = OpenDatabase ( " MyDatabase.mbd ")' Altere isso para o nome do seu banco de dados

com dbTest

definir rsRecordset = . OpenRecordset ( " Tabela1" , dbOpenTable ) 'Change tabela 1 para o nome de sua tabela

terminar com "
4

Escreva o código para copiar o conjunto de registros em outra tabela . O código fica assim:

" Dim SQLStatement como corda

'A consulta para inserir no quadro Mudança Tabela2 para nome de sua tabela

SQLStatement = . " INSERT INTO Tabela2 valores " e rsRecordset

Com Enquanto não rsRecordset.EOF

terminar com "
5

Clique no ícone" Salvar " no Editor do Visual Basic. Clique no botão " Run ( !) " Botão se você gostaria de executar o procedimento e copiar o conjunto de registros para a mesa agora. Se não estiver, feche o Editor do Visual Basic e clique no botão " Escritório " e depois em "Salvar" para salvar as alterações no banco de dados.