S
SimonM
Try using the following on the On_Click event of the
button (this prints the document specified in the path):
Dim MyPath As String, wd As Object, dc As Object
MyPath = "C:\My Documents\Doc1.doc"
Set wd = CreateObject("Word.Application")
Set dc = wd.Documents.Open(MyPath)
dc.PrintOut
dc.Close
Set dc = Nothing
wd.Quit
Set wd = Nothing
button (this prints the document specified in the path):
Dim MyPath As String, wd As Object, dc As Object
MyPath = "C:\My Documents\Doc1.doc"
Set wd = CreateObject("Word.Application")
Set dc = wd.Documents.Open(MyPath)
dc.PrintOut
dc.Close
Set dc = Nothing
wd.Quit
Set wd = Nothing