error handler, goto errgetfile

J

Janis

Our network printer can change from 01 to 09. right now it is 02 but if they
change it on the network then the print macros don't work. I would like a
case statement so it just tries all the possibilities or gives the user a
message or a loop but I don't know how to do it.


On Error GoTo errGetFile
' the network number can change, if error try another number between
1 ... 9
Application.ActivePrinter = "\\martinezfs1-bay\Ca-Martinez-94C on
Ne02:"
Exit Sub
' handle possible printer exceptions
errGetFile

Application.ActivePrinter = "\\martinezfs1-bay\Ca-martinez-94C on
Ne01:"

Else
MsgBox " warning there is a problem with the printstring."
Resume Next


tia,
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top