ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Printer Ports (https://www.excelbanter.com/excel-programming/370343-printer-ports.html)

WBTKbeezy

Printer Ports
 
I am trying to write a macro that allows you to print to a PDF from an excel
sheet. The problem I am running into is that when I have the Adobe Writer
"printer" selected it automatically says it's on Ne02. I need other people
to be able to use this worksheet and I know not everyone has their Adobe
writer on Ne02... Is there a way I can make that universal? I though of
having a popup box for you to input that, but some people using it might not
know enough, is there a way for the code to figure it out for itself? Thanks
in advance for any help.

Tom Ogilvy

Printer Ports
 
Printer
Port
PDF


Use something like:

for i = 1 to 9
err.clear
On error resume Next
Application.ActivePrinter = "printername on Ne0" & i & ":"
if err.Number = 0 then exit for
On error goto 0
Next
On Error goto 0


--
Regards,
Tom Ogilvy


"WBTKbeezy" wrote:

I am trying to write a macro that allows you to print to a PDF from an excel
sheet. The problem I am running into is that when I have the Adobe Writer
"printer" selected it automatically says it's on Ne02. I need other people
to be able to use this worksheet and I know not everyone has their Adobe
writer on Ne02... Is there a way I can make that universal? I though of
having a popup box for you to input that, but some people using it might not
know enough, is there a way for the code to figure it out for itself? Thanks
in advance for any help.


WBTKbeezy

Printer Ports
 
That is perfect, although it seems to try to print twice for some reason...
Any thoughts?


"Tom Ogilvy" wrote:

Printer
Port
PDF


Use something like:

for i = 1 to 9
err.clear
On error resume Next
Application.ActivePrinter = "printername on Ne0" & i & ":"
if err.Number = 0 then exit for
On error goto 0
Next
On Error goto 0


--
Regards,
Tom Ogilvy


"WBTKbeezy" wrote:

I am trying to write a macro that allows you to print to a PDF from an excel
sheet. The problem I am running into is that when I have the Adobe Writer
"printer" selected it automatically says it's on Ne02. I need other people
to be able to use this worksheet and I know not everyone has their Adobe
writer on Ne02... Is there a way I can make that universal? I though of
having a popup box for you to input that, but some people using it might not
know enough, is there a way for the code to figure it out for itself? Thanks
in advance for any help.


Tom Ogilvy

Printer Ports
 
there was nothing in my code that did a print. So I guess that would be in
your implementation.

--
Regards,
Tom Ogilvy


"WBTKbeezy" wrote:

That is perfect, although it seems to try to print twice for some reason...
Any thoughts?


"Tom Ogilvy" wrote:

Printer
Port
PDF


Use something like:

for i = 1 to 9
err.clear
On error resume Next
Application.ActivePrinter = "printername on Ne0" & i & ":"
if err.Number = 0 then exit for
On error goto 0
Next
On Error goto 0


--
Regards,
Tom Ogilvy


"WBTKbeezy" wrote:

I am trying to write a macro that allows you to print to a PDF from an excel
sheet. The problem I am running into is that when I have the Adobe Writer
"printer" selected it automatically says it's on Ne02. I need other people
to be able to use this worksheet and I know not everyone has their Adobe
writer on Ne02... Is there a way I can make that universal? I though of
having a popup box for you to input that, but some people using it might not
know enough, is there a way for the code to figure it out for itself? Thanks
in advance for any help.


WBTKbeezy

Printer Ports
 
Works on others computers, so I will have to look into it, thanks a lot this
is a perfect start!

"Tom Ogilvy" wrote:

there was nothing in my code that did a print. So I guess that would be in
your implementation.

--
Regards,
Tom Ogilvy


"WBTKbeezy" wrote:

That is perfect, although it seems to try to print twice for some reason...
Any thoughts?


"Tom Ogilvy" wrote:

Printer
Port
PDF


Use something like:

for i = 1 to 9
err.clear
On error resume Next
Application.ActivePrinter = "printername on Ne0" & i & ":"
if err.Number = 0 then exit for
On error goto 0
Next
On Error goto 0


--
Regards,
Tom Ogilvy


"WBTKbeezy" wrote:

I am trying to write a macro that allows you to print to a PDF from an excel
sheet. The problem I am running into is that when I have the Adobe Writer
"printer" selected it automatically says it's on Ne02. I need other people
to be able to use this worksheet and I know not everyone has their Adobe
writer on Ne02... Is there a way I can make that universal? I though of
having a popup box for you to input that, but some people using it might not
know enough, is there a way for the code to figure it out for itself? Thanks
in advance for any help.



All times are GMT +1. The time now is 05:45 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com