Print a word document from access

  • Thread starter Thread starter Warrio
  • Start date Start date
Sure!

Set a reference to Microsoft Word. Then use the following code:

Public Sub OpenWordDoc(Path As String)
Dim WApp As Word.Application
Set WApp = CreateObject("Word.Application")
If Path <> "" Then
' Check if file exists, if not give error msg
If Dir(Path) = "" Then
Dim errormsg As String
errormsg = "The following document does not exist:"
errormsg = errormsg & vbCrLf
errormsg = errormsg & Path
errormsg = errormsg & vbCrLf & vbCrLf
errormsg = errormsg & "Cannot open this file."
MsgBox errormsg
Exit Sub
End If
WApp.Documents.Open Path, Visible:=True
Else
WApp.Documents.Add Visible:=True
End If
WApp.Visible = True
End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Closing Word 2000 from Access 2000 2
Print section of a word document from an access button click event. 2
Print a word document 2
Two versions of Word aren't playing together 21
Print a list of Word documents without opening them 8
Amyuni Document Converter 0
Page Numbers Question 1
Save as PDF in Office 7

Back
Top