Mala direta De Access para Word[resolvido]

Preciso criar um relatorio em access e através do  cadastro que eu tenho no banco tenho que enviar os dados pre formatados para o word e lá eu terminarei o resto da formatação.

Seria mais ou menos assim.

Eu clico no botão imprimir e neste instante através do codigo

docmd.accpreviu ,,relatorio

eu posso visualisar par impressão, nesta hora vai pegar o codigo do cliente e vai mandar os dados por relatorio. ENtão eu irei precisar de um outro botão no visualizador da pre formatação do cliente para mandar os dados para o botão mesclar do access. Eu poderia resolver tudo clicando no botão mesclar celulas no access, mas o usuario exige que seja feito por codigo.

Eu acho que irei precisar importar uma biblioteca do activex do access e programar via o.o com força dessa vez, usando imports e tudo mais, assim como se faz com ADO.

Eu acho que irei precisar de usar o objetoWord.aplicatttion. Para passar os paramentros e abrir na aba mala direta conectado com o banco todos os campos a serem mesclados.

Agora como eu posso fazer isso não sei, eu já ulhei por ai tudo, inclusive aqui no forum, achei um exemplo, mais ele não manda pro word, ele formata tudo via codigo sem abrir o word, não serve, não da´.

Alguém pode me dá uma ajuda?

Estou programando em um ambiente onde eu não sou o administrador, fica dando erro dizendo que o arquivo que aponto, não existe, para não violar a rotina da empresa eu farei o teste no meu computador pessoal para ver se eu já pude encontrar a solução.

Como eu estava a falar.

Eu preciso usar uma biblioteca dos activex

então eu irei precisar de variáveis assim no vba.

Código:

Dim objWord as object
Dim saidaObjWord as object

 Set objWord = CreateObject("Word.Application")

Pelo menos isso irá criar o objeto word, mas agora eu irei precisar inserir a linha de comando, os comando sql e objeto de saida... Tem muita coisa ainda pela frente!

Conto com a ajuda de vocês!

Apesar de eu ter toda a codificação pronta comigo que faz o que eu preciso, o office diz que o documento que quero abrir na mala direta não pode ser localizado, mesmo ele existindo onde eu coloquei.

Será que tem alguém ai que dê um socorro?

Não vou postar o código por não ter colaboração!

Só dando o retorno de problema resolvido.

Bom dia adriano
Eu transporto do Access para o Word da seguiente forma:
Dim strPath As String
Dim intFile As Integer
Dim strLine As String
Dim dbs As DAO.Database
Dim rst As DAO.Recordset
On Error Resume Next
strPath = "C:\Documents and Settings\Seu caminho.TXT" 'Aqui coloque o nome do caminho'
If Len(strPath) = 0 Then Exit Sub
intFile = FreeFile
Open strPath For Append Access Write Lock Read Write As #intFile
Set dbs = CurrentDb
Set rst = dbs.OpenRecordset("Sua tabela") 'É a Tabela!
While Not rst.EOF
Print #intFile, (rst!Seu campo), ' Nome do campo da Tabela '
rst.MoveNext
Wend
On Error Resume Next
If Not rst Is Nothing Then
rst.Close
Set rst = Nothing
End If
If Not dbs Is Nothing Then
Set dbs = Nothing
End If
Close #intFile
Exit Sub
End Sub

Não sei se ajuda
Pina

Obrigado Pina, mutchas gracias!