[Resolvido]Desvincular word do access após gerar arquivo

Estou fazendo uso da mala direta com word, para gerar relatorios em word. Após abrir o arquivo com a mala direta atualizada preciso salva-lo, mas eu quero salva-lo como arquivo comum (sem mala direta) desvinculado, para que posteriormente ele não se altere. Fique do jeito que foi salvo. Alguem conhece um codigo para desvincular ou salvar sem o vínculo?

Grato.

Olá, seja bem vindo ao fórum!

Esse arquivo é gerado à partir do Access ou no próprio Word?

Desculpa pela demora. O arquivo é gerado pelo access. Eu queria saber alguma forma de salvar esse documento de word gerado sem o vínculo.

Grato.

Como está gerando esse doc? Através de macro, exportando via ribbon ou por vba? Poste os detalhes. Se for por vba, poste o código completo que está usando.

O doc está sendo gerado via VBA. Segue o código:


Private Sub Comando34_Click()
Dim oApp As Object 'Cria uma variável objeto

Set oApp = CreateObject("Word.Application") 'Cria e abre o objeto Word
With oApp

' Torna o MS Word visível
Visible = True

' Abre o documento base
.Documents.Open ("E:\WORD\CERTIFICADO EM WORD LOLER_Subsea.doc")

'MeuWord.Visible = True
.ActiveDocument.SaveAs "C:\Teste" & ".doc"

'Fecha o documento
MsgBox "Documento Word gerado com sucesso...", vbInformation
.ActiveDocument.Close
End With

'Fecha o Word
oApp.Quit

alguém?

Bom dia,

Salve com Data e Hora, assim cada vez que salvar, terá um arquivo novo.

Amigo Charles, o que o colega quer é quebrar o vínculo da mala direta no novo arquivo, se bem entendi.

Ronan, como é esse arquivo com a mala direta? Talvez se possa ter um template dele com marcadores no lugar dos campos para que se possa enviar os dados direto da tabela para esses marcadores do template de forma que não precise da mala direta.

Veja o modelo do meu certificado (o que está em amarelo são as informações que se alteram)
https://2img.net/r/ihimg/photo/my-images/839/modelom.png/


Não sei como fazer usando templates.
Terei que dizer via codigo a posição de cada dado?
Como faz isso?

À partir desse modelo que enviou, eu criei uma cópia desvinculada, que se encontra no anexo. Você pode, agora, Inserir Indicadores nos locais aonde os dados serão adicionados e utilizar os nomes dos indicadores criados para isso. Basta selecionar os campos, no doc, e ir no menu Inserir > Indicador. Na janela que será aberta, dê um nome para o indicador e confirme. Repita o passo para todos os campos. Depois, veja nesse tópico como jogar os dados do Access para o doc. Na mensagem n° 15 tem um exemplo que eu deixei.

E então, conseguiu resolver? Aguardamos retorno.

Sim, atendeu completamente ao que estava procurando.
E olha que tenho procurado por essa solução faz tempo...

Deixa eu tirar mais uma dúvida, como faço para fazer a mesma coisa só que com imagem, ou seja, mandar uma imagem do access para o local com indicador no word. A imagem está numa tabela como objeto OLE.

E como eu posso formatar o texto que estou enviando pro word, tipo fonte, tamanho da letra, negrito, essas coisas.

Novamente, Obrigado.

Deixa eu tirar mais uma dúvida, como faço para fazer a mesma coisa só que com imagem, ou seja, mandar uma imagem do access para o local com indicador no word. A imagem está numa tabela como objeto OLE.


Viu um exemplo aqui no fórum, mas não me atendeu porque eu as minhas imagens não estão vinculadas a um endereço do computador.
Como faço??

Tentou passar o objeto OLE no lugar do endereço do exemplo? Eu quase nunca trabalho com objetos OLE, mas veja se nas dependências do mesmo tem algo que permita extrair a imagem, como Me.NomeObjeto.Image ou Picture no lugar de Image ou whatsoever.

Nao entendi exatamente o que você quis dizer.

Tentou passar o objeto OLE no lugar do endereço do exemplo?
Tentei mas não consegui.

Naquele exemplo vc fez assim:

ActiveDocument.Bookmarks("ASS2").Select
.Selection.InlineShapes.AddPicture FileName:="" & RsCli!Ass2 (no caso era um endereço)& "", LinkToFile:=False, SaveWithDocument:=True

No meu caso,Rscli!Ass2 é uma imagem ole que está numa consulta.
Como eu coloco a parte do ".selection."?

Como eu disse, muito dificilmente trabalho com OLE, mas no caso acredito que deves alterar a origem da imagem apenas, trocado da imagem gravada no hd para a imagem do campo OLE.