Using Application.ActivePrinter to Set Acrobat Disitiller 6.0

[tudor30]

I recently upgraded from Acrobat 5.0 to 6.0 (Standard). I have VBA code the previously worked well in 5.0 to create postscript files.

The code does not work as is for Acrobat Distiller 6.0.

Code Being Used:
Dim PSFileName As String
Application.ActivePrinter = "Acrobat Distiller on Ne00:"
Application.Goto Reference:="r1c1"
Let PSFileName = Application.ActiveCell
SendKeys PSFileName & "{ENTER}", False
Sheets("ECN FacePage").PageSetup.PrintArea = "$F$5:$R$55"
Worksheets.PrintOut , PrintToFile:=True
PSFileName = Chr(34) & PSFileName & Chr(34)

How do I find the name to use on the line for, Application.ActivePrinter = "Acrobat Distiller on Ne00:" ?

Thanks for any assistance.

 

[Zenkai]

The easiest way to do that is turn on the macro recorder in Tools > Macros > Record. Then, go to File > Print, and set the printer to the Distiller (if it's already on the Distiller, set it to something else, then back to Distiller). Cancel the print job, hit "stop" on the macro recorder, then go into your vba code, and in the personals.xls workbook will be the line of code you're looking for.

-Nick

 

[tudor30]

Thanks

That worked! It's always the simple stuff.

John