Hi, I just can't get this to work - I keep getting Runtime error 1004 ?
The aim is just to print to another printer called 'HP 1200 Tray 2'

Any tips would be great. Thanks.

*Sub Printer2()

Dim STDprinter As String
STDprinter = Application.ActivePrinter
Application.ActivePrinter = "HP 1200 Tray 2 on
HPBusinessInkjet1200:"
' change printer
ActiveSheet.PrintOut
' prints the active sheet
Application.ActivePrinter = STDprinter
' change back to standard printer
End Sub*


--
Cam
------------------------------------------------------------------------
Cam's Profile: http://www.excelforum.com/member.php...o&userid=27836
View this thread: http://www.excelforum.com/showthread...hreadid=513986