Add a reference to the Microsoft Word Object Library.
Imports Microsoft.Office.Interop
Dim oWord As Word.Application
Dim oDoc As Word.Document
' Start Word and open the document template
oWord = CreateObject("Word.Application")
oWord.Visible = True
oDoc = oWord.Documents.Add