VBA for selecting printer

[goranimo]

Hi,

I've searched and I've found others asking for the same, but I couldn't find any solution.

I need a code to that automatically will print to PDFCreator even if this is not the default printer.

The name of the printer is PDFCreator

I used this code to find the printer on the server:

Please Login or Register  to view this content.

The result is PDFCreator on Ne00

I can then print using this code:

Please Login or Register  to view this content.

The problem is that I want this to work on every computer on the network. Some will have the printer name PDFCreator on Ne01 or PDFCreator on Ne02 and so on.

I need a code that will use PDFCreator on Ne0 and then search for the last number.

[Kyle123]

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

[EssoExplJoe]

You can use the GetPrinterFullNames code below to find a list of the printer names with ports in a string arrays then search the string for a printer containing the "PDFCreator" string. You can then set the active printer to be the printer name. NOTE that this code was originally from a fellow named By Chip Pearson and I only slightly modified it.

Please Login or Register  to view this content.

[goranimo]

Kyle123:

Thanks.

I've copied and paste the Funvtion, but how can I get this to work?

How will this code automatically select PDFCreator as printer, even when this is not the default printer?

What do I need to change/add in my original code?

[bakerman2]

Try this.

Please Login or Register  to view this content.

[goranimo]

bakerman2: I tried your code but when i run the macro nothing happens.

Can I test the function if Excel can find the port, using msgbox?

[goranimo]

Anyone?

[bakerman2]

If you put a stop point at the End Function row(put cursor in End function and press F9.
Then start printer sub, in your Local Variables window you can see the value for GetPrinterPort2.

[goranimo]

Now it works. I had blank document, that was the only reson that nothing happened

Thank you everybody

[bakerman2]

You're welcome.

[goranimo]

Just a bonus question

Is there any way I can define a standard filename when printing to PDF?

I already have a macro for saving with a spesific name, but I want to define PDF filename also.

The code I have for saving is

Please Login or Register  to view this content.

[bakerman2]

Since this question isn't related to the current thread I suggest you start a new thread.
Include the code you use to create your pdf-file and clearly explain the way you want to create the filename.