To open a word document, create reference to Microsoft Word and then
Function Open_WordDoc()
Dim objWord As Word.Application
Dim objDoc As Word.Document
Dim DocPath As String
DocPath = "Path and name of the document"
Set objWord = New Word.Application
Set objDoc = objWord.Documents.Open(DocPath)
objDoc.Activate
objDoc.PrintOut ' To print out
objWord.Visible = True ' To display
End Function