This is what I use:

Dim Word As New Word.Application
Dim WordDoc As New Word.Document
Dim Doc As String

Doc = "C:\insert file path and doc name here.doc"
Set WordDoc = Word.Documents.Open(Doc)
Word.Selection.WholeStory
Word.Selection.Copy

HTH
Ed

"Graham Davies" wrote in message
...
I can start Word by using Application.activatemicrosoftapp
xlmicrosoftword but this alsways opens a blank document. I
need to open an existing document to add something to it.


Any ideas??