I would like a macro that would print a specified page from a Word document from Excel without opening the Word document. The specific page to be printed would be based on the users choice of item A or item B, e.g., if Excel checkbox A is selected, Word page 1 is to print; if Excel checkbox B is selected, Word page 2 is to print.
I have found this code (from another help site) to work but it prints all pages of the Word document:
'Sub Print_Word()
' MyDoc = "C:\mydoc.doc" 'Change to the correct path and document
' Set wrdApp = CreateObject("Word.Application")
' Set wrdDoc = wrdApp.Documents.Open(MyDoc)
'
' wrdDoc.PrintOut
' wrdDoc.Close
' wrdApp.Quit
' End Sub
I know that the code .PrintOut Pages:=1 or .PrintOut From:=1, To:=1 needs to be included in the macro, but I just can't figure out the syntax.
Your help and expertise are much appreciated!
Michele
I have found this code (from another help site) to work but it prints all pages of the Word document:
'Sub Print_Word()
' MyDoc = "C:\mydoc.doc" 'Change to the correct path and document
' Set wrdApp = CreateObject("Word.Application")
' Set wrdDoc = wrdApp.Documents.Open(MyDoc)
'
' wrdDoc.PrintOut
' wrdDoc.Close
' wrdApp.Quit
' End Sub
I know that the code .PrintOut Pages:=1 or .PrintOut From:=1, To:=1 needs to be included in the macro, but I just can't figure out the syntax.
Your help and expertise are much appreciated!
Michele