Microsoft Office Forums - View Single Post

gmayor · 05-05-2016, 09:58 PM

Save the templates as macro enabled and add the following macros to the templates. the macros will intercept the Print commands and print only page 2

Code:

Option Explicit

Sub FilePrint()
    Application.PrintOut Filename:="", _
                         Range:=wdPrintRangeOfPages, _
                         copies:=1, _
                         Pages:="2"
End Sub

Sub FilePrintDefault()
    Application.PrintOut Filename:="", _
                         Range:=wdPrintRangeOfPages, _
                         copies:=1, _
                         Pages:="2"
End Sub