PDF Save As problem

[lance99]

I have been searching days for a solution to this problem. I am using Excel
2002 with Adobe 6.0 to create reports. I know all the different routes to
take: print to file as .ps and then convert, using the distiller, but I am
using the

Application.ActivePrinter = "Adobe PDF on Ne00:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"Adobe PDF on Ne00:", Collate:=True

Which then brings up a Save As prompt. I am trying to send the filename to
the box via vba. I have tried the SendKeys function which I have used in
other code for basically the same purpose but it doesn't work.

Does anyone have a solution for this, if so it would be greatly appreciated.

Thanks

 

[Trexx]

lance99
this is extracted from the comp.lang.rexx newsgroup...from Lee Peedin. Note
this won't work with Distiller 4.0, but
appears to work with Distriller 6.0

There are 2 things necessary to make the Adobe Distiller "automatic".

1) Open the Properties for the Adobe Distiller (in your printers
folder)

On the General Tab click Printing Preferences

Remove the check by "Prompt For Adobe PDF filename"
(this is what prompted for the file name)

Remove the check by "View Adobe PDF results"
(this is what opened the PDF reader after the file was created)

2) Go back to the Properties and select the "Ports" tab

Select the "Add Port" button

You will see a list of port types
Select Adobe PDF Port and click New Port

At that point you will be shown a dialog of folders accessible on
your system, select the folder you wish the PDF files to be saved in.

T-Rex