Microsoft Office Word é um aplicativo de processamento de texto incluído no pacote Microsoft Office. Microsoft Visual Basic for Applications, ou VBA, é uma linguagem de programação de computadores usados ​​para automatizar tarefas rotineiras. Aprender a passar dados entre documentos do Word usando VBA é útil quando você precisa continuamente mesclar documentos do Word manualmente. Em poucos passos você pode aprender como escrever código VBA para abrir dois documentos do Word e transferir dados entre eles. Instruções
1

Abra o Microsoft Office Word, tipo " esse dado é em firstDoc " e salve em "C: \\". " FirstDoc.doc ", como Feche o documento . Adicionar um novo documento , digite " Este dado é no secondDoc " e salve em "C: \\". " SecondDoc.doc ", como Feche o documento .
2

Abra o Microsoft Office Word , selecione a guia "Desenvolvedor" e clique em " Visual Basic ". Clique no menu "Inserir " e selecione " Module ". Copie e cole o seguinte código em seu módulo para trocar o texto entre " firstDoc.doc " e " secondDoc.doc ".

3

Sub passDataBetweenWordDocs particulares ()

Dim wrd1App Como Word.Application

Dim wrd2App Como Word.Application

Set wrd1App = CreateObject (" Word.Application " )

Set wrd2App = CreateObject (" Word.Application " )

wrd1App.Visible = True

wrd2App.Visible = True

Definir wordFirstDoc = wrd1App.Documents.Open ( "C: \\ firstDoc.doc " )

Set wordSecondDoc = wrd2App.Documents.Open ( "C: \\ secondDoc.doc " )

wrd1App.Selection.Expand wdLine

sTextDoc1 = wrd1App.Selection.Text

wrd2App.Selection.Expand wdLine

sTextDoc2 = wrd2App.Selection.Text

wrd1App.Selection.TypeParagraph

wrd1App.Selection.TypeText texto: = " Este texto foi passada de secondDoc : " & Texto: = " Este texto foi passado de firstDoc :" & sTextDoc1

wrd2App.Selection.TypeParagraph

End Sub
4

Execute você sub-rotina com a tecla " F5 . "