Printing

[ordnance1]

The code below is suppose to print a worksheet, but my problem is that it
prints to a specific network printer and that printer is not always assigned
to Ne09. The number is not always assigned to that printer. I have seen it be
anything from Ne01 to Ne10. Any way this code can be forced to look for the
proper Ne##?

Sub Macro7()
'
' Macro7 Macro
' Macro recorded 8/28/2008 by wta
'

'
Application.ActivePrinter = "\\printserver1\ParaT_HPLJ_3800 on Ne09:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"\\printserver1\ParaT_HPLJ_3800 on Ne09:", Collate:=True
End Sub

 

[Gary Keramidas]

maybe someone has an idea, but how about this?

application.Dialogs(xlDialogPrint).Show

 

[Patrick C. Simonds]

I do not want the print dialogbox to show. This was just a snippet of code.
The actual macro is more involved. I just need a way to get it to go to the
right printer.