Selecting Printer with a Template

M

mcp6453

I have created a template in Word 2003 that uses a color printer instead
of the standard laser printer. How can I cause that template to
automatically select the color printer? Do I need a macro? Any help
appreciated.
 
G

Graham Mayor

You could intercept the print commands in the template by saving the
following macros *IN THAT TEMPLATE*
Change the HP printer name for the colour printer name

Sub FilePrintDefault()
Dim sCurrentPrinter As String
sCurrentPrinter = ActivePrinter
ActivePrinter = "HP LaserJet 4050 Series PCL"
Application.PrintOut FileName:=""
ActivePrinter = sCurrentPrinter
End Sub

Sub FilePrint()
Dim sPrinter As String
With Dialogs(wdDialogFilePrintSetup)
sPrinter = .Printer
.Printer = "HP LaserJet 4050 Series PCL"
.DoNotSetAsSysDefault = True
.Execute
Dialogs(wdDialogFilePrint).Show
.Printer = sPrinter
.DoNotSetAsSysDefault = True
.Execute
End With
End Sub

http://www.gmayor.com/installing_macro.htm


--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP


<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
 
Top