Writing to MS Word

[Negative0]

Try using Late Binding instead of creating a reference to the Word Object.

so

Dim WordApp As New Word.Application

would become

Dim WordApp as Object
WordApp = CreateObject("Word.Application")