Microsoft Office Word est une application de traitement de texte inclus dans la suite Microsoft Office . Microsoft Visual Basic pour Applications, ou VBA, est un langage de programmation informatique couramment utilisé pour automatiser des tâches de routine. Apprendre à transmettre des données entre des documents Word à l'aide de VBA est utile lorsque vous avez besoin de fusionner en permanence des documents Word manuellement . En quelques étapes, vous pouvez apprendre comment écrire du code VBA pour ouvrir deux documents Word et transférer des données entre eux. Instructions
1

Ouvrez Microsoft Office Word , tapez " ces données sont dans firstDoc " et enregistrez dans "C: \\ " as ". FirstDoc.doc " Fermez le document . Ajouter un nouveau document , tapez " Ces données sont dans le secondDoc " et enregistrez dans "C: \\ " as ". SecondDoc.doc " Fermez le document.
2

Ouvrez Microsoft Office Word , sélectionnez l'onglet « Développeur » et cliquez sur « Visual Basic ». Cliquez sur le menu "Insertion" puis sélectionner "Module ". Copiez et collez le code suivant dans votre module d'échanger du texte entre " firstDoc.doc " et " secondDoc.doc . "
3

passDataBetweenWordDocs Private Sub ()

Dim wrd1App Comme Word.application

wrd2App As Word.application

Set wrd1App = CreateObject (" Word.Application " )

Set wrd2App = CreateObject (" Word.application " )

wrd1App.Visible = True

wrd2App.Visible = True

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

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

wrd1App.Selection.Expand wdLine

sTextDoc1 = wrd1App.Selection.Text
< p> wrd2App.Selection.Expand wdLine

sTextDoc2 = wrd2App.Selection.Text

wrd1App.Selection.TypeParagraph

wrd1App.Selection.TypeText texte : = " Ce texte a été passé de secondDoc : "& Text : = " Ce texte a été transmis de firstDoc :" & sTextDoc1

wrd2App.Selection.TypeParagraph

End Sub
4

vous exécutez sous-programme en appuyant sur la touche "F5 ».