Designate Printer

S

Shelly9633

I have two local printers, and one network printer on my computer. Is there
anyway to designate a printer for a file, so that it doesn't automatically
print to the default printer?
 
B

Bob Phillips

You could call up the printer dialog and let them select.
application.dialogs(xldialogprint).Show

or maybe try this

Dim currPrinter
With Application
currPrinter = .ActivePrinter
.ActivePrinter = "HP DeskJet 890C on LPT1:"
ActiveWindow.SelectedSheets.PrintOut
.ActivePrinter = currPrinter
End With



--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)
 
Top