Há mais de uma maneira de obter os dados a partir do Word para o Access, mas o envio de dados entre esses dois aplicativos envolve um conceito de que a documentação da Microsoft refere-se a " automação ". Esta palavra se refere a uma aplicação que controla outra , especialmente por meio dos objetos virtuais que a aplicação controlada expõe para outros aplicativos. Linguagem de programação do Word, Visual Basic for Applications, é a ferramenta de programadores usam para enviar os dados do Word para o Access. A capacidade de executar tais automação revela que qualquer um dos aplicativos do Office podem alavancar os comandos dos outros. Instruções
1

Abra o Microsoft Access e clique no botão "Tabela" na aba " Criar". Esta ação começa a criar uma tabela para a qual você vai enviar os dados do formulário do Word .
2

Type " Campo1 " na célula ao lado do campo "ID" . Esta ação cria uma nova coluna, " campo1 " na nova tabela .
3

Clique no botão do Office e clique em " Salvar como". Digite " C: \\ myDb.accdb " para o nome do arquivo. Quando o Access pede-lhe para o nome da tabela, digite " tabela 1 ". Isso completa a configuração da tabela para que o Word irá enviar os dados do formulário.
4

Fechar Access e , em seguida, abra o Word .
5

Clique na guia "Desenvolvedor" e , em seguida, clique no botão "Legado Tools" no painel " Controles " .
6

Clique no controle " caixa de texto " e em seguida, arraste na janela do documento para definir uma caixa de texto para entrada do usuário.

7

Repita o passo 5 e , em seguida, clique no controle "Button". Arraste o mouse abaixo da caixa de texto para criar um botão com o qual o usuário pode enviar seus dados de caixa de texto .
8

botão direito do mouse no botão e , em seguida, clique em " View Code" para entrar na função Visual Basic Palavra que será executado quando o usuário clica no botão.
9

Digite a seguinte instrução na posição atual do cursor. Esta afirmação chama outra rotina que irá enviar o valor da caixa de texto para o Access para armazenamento.

SendToAccess box1 Texto
10

Clique no "Referências" de item do menu "Ferramentas" e , em seguida, clique na caixa de seleção "Objetos do Microsoft Access " . Isto diz- Visual Basic que seu programa precisa de ter acesso a objetos virtuais do Microsoft Access.
11

Cole o seguinte programa abaixo da instrução "End Sub" . Este programa é executado de forma invisível Acesso e diz-lhe para inserir os dados na caixa de texto para a tabela do Access que você criou anteriormente .

Public Sub sendToAccess ( str1 )

Dim str2

Dim appAccess As Access.Application

Set appAccess = CreateObject (" Access.Application " )

appAccess.OpenCurrentDatabase ( "c: \\ myDb.accdb " )

str2 = " inserir na tabela 1 os valores (campo1 ) ( '" & str1 & " ') "

appAccess.CurrentDb.Execute str2

appAccess.CurrentDb.Close

appAccess.Quit

End Sub
12

Clique no ícone da palavra na barra de tarefas do Windows para retornar ao Word e , em seguida, clique no botão " design" para sair do modo de design. Este começa a funcionar a forma que você fez anteriormente . Você está agora efetivamente o usuário para o qual você escreveu o programa.
13

Digite o texto na caixa de texto e , em seguida, clique no botão abaixo da caixa de texto. O botão vai ficar pressionado por um momento enquanto o programa é executado.
14

Abra o Windows Explorer e navegue até a pasta " \\", que é o local onde você salvou o banco de dados " mydb.accdb " .

15

duplo clique em " mydb.accdb " para abri-la e , em seguida, clique duas vezes no item de " tabela 1 " no painel de navegação . Quando a tabela é aberta , você verá a palavra digitada na caixa de texto no documento forma Word. Isto diz-lhe que o seu programa foi um sucesso no envio de dados de formulário a partir do Word para o Access.