Adjust vba to handle multiple printers

Good Day,

I need to adjust my current code to adapt where the printer will be on a network, depending on where the computer is located.

Various network hubs are in use, so the NE code at the end changes.

My current code is:

Please Login or Register  to view this content.

It has to cycle through, with no error the following:
\\Csg\Star TSP100 Cutter (TSP143) on Ne00:
\\Csg\Star TSP100 Cutter (TSP143) on Ne01:
\\Csg\Star TSP100 Cutter (TSP143) on Ne02:
\\Csg\Star TSP100 Cutter (TSP143) on Ne03:
\\Csg\Star TSP100 Cutter (TSP143) on Ne04:
\\Csg\Star TSP100 Cutter (TSP143) on Ne05:
\\Csg\Star TSP100 Cutter (TSP143) on Ne06:

If it still cannot print, it should display the messagebox "Cannot find a Printer"

Currently all off network sheet bomb out with a debug message. I wan't to try and avoid this.

Any help will be greatly appreciated.

Kind Regards

JEDEMEYER1

Have a look here http://www.excelforum.com/tips-and-t...excel-vba.html

Thanks Kyle,

But I don't know how to adjust my code to actually use this function.

I tried the suggestion on the link:

Please Login or Register  to view this content.

But it does not work...

Regards

JEDEMEYER1

You just need to replace my printer name with yours, that will then return the printer port. So change the knv etc


Sent from my iPhone using Tapatalk