Copy of *.doc

[RealisticGraphics]

Well, you would do something similar to this.

Sub Combine()
Set NewDoc = Word.Documents.Add
NewDoc.Content = Doc1.Content & Doc2.Content
Set NewDoc = Nothing
End Sub

Where Doc1 is your first document and Doc2 is your second.