Microsoft Office Word è un programma di elaborazione testi inclusi nella suite Microsoft Office . Microsoft Visual Basic , Applications Edition, o VBA , è un linguaggio di programmazione comunemente usato per automatizzare le attività di routine . Imparare come passare i dati tra i documenti di Word utilizzando VBA è utile quando si ha bisogno di fondere continuamente i documenti di Word manualmente . In pochi passi si può imparare a scrivere codice VBA per aprire due documenti di Word e di trasferire i dati tra di loro . Istruzioni
1
Aprire Microsoft Office Word , digitare " questi dati sono in firstDoc " e salvare in " C : \\ " come " . FirstDoc.doc " Chiudere il documento . Aggiungi un nuovo documento , tipo "Questi dati sono in secondDoc " e salvare in " C : \\ " come " . SecondDoc.doc " Chiudere il documento.
2
Aprire Microsoft Office Word , selezionare la scheda "Sviluppatore " e cliccare su " Visual Basic ". Fai clic sul menu "Inserisci" e selezionare "Modulo ". Copiare e incollare il seguente codice nel tuo modulo di scambiare testo tra " firstDoc.doc " e " secondDoc.doc . "
3
passDataBetweenWordDocs Private Sub () Dim
wrd1App Come Word.Application
Dim wrd2App Come Word.Application
wrd1App = CreateObject ( " Word.Application " ) per
wrd2App = CreateObject ( " Word.Application " ) per
wrd1App.Visible = True
wrd2App.Visible = True
wordFirstDoc = wrd1App.Documents.Open ( " C : \\ firstDoc.doc " ) per
wordSecondDoc = wrd2App.Documents.Open ( " C : \\ secondDoc.doc " ) per
wrd1App.Selection.Expand wdLine
sTextDoc1 = wrd1App.Selection.Text
< p > wrd2App.Selection.Expand wdLine
sTextDoc2 = wrd2App.Selection.Text
wrd1App.Selection.TypeParagraph
wrd1App.Selection.TypeText text : = " Questo testo è stato passato da secondDoc : " & Text : = " Questo testo è stato approvato da firstDoc : " & sTextDoc1
wrd2App.Selection.TypeParagraph
End Sub
4
Run si sottoprogramma con il tasto " F5 . "