Hi there,
I want to create a macro that will autoselect the Adobe
Distiller printer, then I don't want the popup window of
Adobe asking path and file name. I want to pass it
without seeing this popup windows.

Here my code

Dim strFileName As String
strFileName = "E:\temp\test.pdf"
Sheets("Sheet1").Select
Application.ActivePrinter = "Adobe Distiller Writer
On CPW2:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1,
ActivePrinter:= _
"Adobe Distiller Writer on CPW2:", Collate:=True

In this line ActiveWindow.SelectedSheets.PrintOut I
cannot find any possible value I can use to pass
strFilename.

Is somebody already did something like that?

Thank's

Christian