[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.

[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

My web site www.gmayor.com
Word MVP web site http://word.mvps.org


mcp6453 wrote:
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.