Refer to Ne0 Printer number programatticaly 1

[sxschech]

In a follow up to thread

http://www.tek-tips.com/viewthread.cfm?qid=1631322

"Active Printer Ne Issue: Moved from XP/Office2003 to Win7/Office2007"...

The NE0 number for Acrobat changed again over the weekend. I finally searched and found code that will programatically identify the NE0 number so that I don't have to hard code the value and hopefully this will allow printing to PDF to work in the future without having to occasionally search for the NE0 number.

Here is the link to the code for identifying the Printer Number:

http://www.excelforum.com/excel-pro...lection-problem-due-to-ne-port-numbering.html

In the actual code for doing the printing, make the following change:

Application.ActivePrinter = [red]"Adobe PDF on Ne04:" 'or whatever Ne0 number it is[/red]

to

Application.ActivePrinter = [red]FindPrinter("Adobe PDF") [/red]

 

[SkipVought]

Hi,
[purple]
Great TIP! -> *[/purple]

Please publish it in a FAQ.

Skip,

_{Just traded in my old subtlety...
for a NUANCE!}

 

[sxschech]

Thanks Skip. Per your request, I have posted it to the FAQ section.