Print to a specific Printer using VBA

[justanotheruser]

Hi all,

I'm using this code to print a sheet using VBA to a specific printer, called Lexmark E350d:

<CODE>Sub MyPrint()
Dim sCurrentPrinter As String
Const MyPrinter As String = "Lexmark E350d"
sCurrentPrinter = ActivePrinter
ActivePrinter = MyPrinter
ActiveSheet.PrintOut '<can change to specific sheet
ActivePrinter = sCurrentPrinter
End Sub</CODE>

Upon executing the code, I get Run-time error '1004': Method 'ActivePrinter' of object '_Global' failed - what does this error mean, debugging highlights the code highlighted in blue above. Thanks in advance!

 

[zaabbasi]

Try printing to the Lexmark then run this - it should give you the correct string to use

Sub test()
MsgBox Application.ActivePrinter
End Sub

works for me thanks