selecting network printer

[Bill Kuunders]

Our IT staff say they cannot solve the issue...............................

I use a macro to select a networked label printer as a default printer and
after the job has been printed to select the normal inkjet printer.

Problem is when we log on to the network the label printer may be on a
different port. I.e. in stead of on Ne04 it may now be on Ne01 and the
macro does not run.....
Is there a different way to select a non default printer?

Thanks
Bill Kuunders

part of the macro.................

Selection.PasteSpecial Paste:=xlValues

Application.ActivePrinter = "\\nzdfprn01\Label_UHT_Sato on Ne04:"
Sheets("label").Select

ActiveWindow.SelectedSheets.PrintOut Copies:=2

Application.ScreenUpdating = True
Application.ActivePrinter = "\\nzdfprn01\Inkjet_BevProd on Ne04:"
Sheets("schedule").Select

 

[Fredrik Wahlgren]

Our IT staff say they cannot solve the issue...............................

I use a macro to select a networked label printer as a default printer and
after the job has been printed to select the normal inkjet printer.

Problem is when we log on to the network the label printer may be on a
different port. I.e. in stead of on Ne04 it may now be on Ne01 and the
macro does not run.....
Is there a different way to select a non default printer?

Thanks
Bill Kuunders

part of the macro.................

Selection.PasteSpecial Paste:=xlValues

Application.ActivePrinter = "\\nzdfprn01\Label_UHT_Sato on Ne04:"
Sheets("label").Select

ActiveWindow.SelectedSheets.PrintOut Copies:=2

Application.ScreenUpdating = True
Application.ActivePrinter = "\\nzdfprn01\Inkjet_BevProd on Ne04:"
Sheets("schedule").Select

try this:
http://www.erlandsendata.no/english/index.php?d=envbaprintchangeprinter

 

[Bob Phillips]

run the print dialog

Application.Dialogs(xlDialogPrint).Show

and then they can select it

--

HTH

RP
(remove nothere from the email address if mailing direct)

 

[Bill Kuunders]

Thanks Bob and Fredrik,
I'm going to try out the macro from (E Ehren)which loops through the numbers
after Ne.. .

It looks to be promissing.
If not I'll try the Dialogs.Show line
I may have to come back to you to see how to code the selection after the
dialogs.show

Thank You both
Bill K