Thursday, January 6, 2011

How to Open a Word Document from Access

Sub OpenWordDoc(strDocName As String)
Dim objApp As Object

'Opens the document

Set objApp = CreateObject("Word.Application")
objApp.Visible = True
objApp.Documents.Open strDocName
End Sub



And that's all it takes. Some companies pay millions of dollars for this.