Dim myWord As Word.Application
Set myWord = New Word.Application
myWord.Visible = True