Listing 1: Code to Open Existing Documents

Dim doc1, doc2
Set doc1 = _
word.Documents.Add("invoice.doc")
Set doc2 = _
word.Documents.Add("expenses.doc")