Ana,
Just delete those 2 arguments:
Sheets(Array("1", "2", "3", "4", "5", "6", "7", "8", "9", "10",
"16" )).Select
Application.ActivePrinter = "Acrobat Distiller sur RPT1:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= "Acrobat
Distiller sur RPT1:"

NickHK

"Ana" wrote in message
...
and how I creat a pdf file from the code without using PrintToFile

"NickHK" wrote:

Ana,
From what I understand (but I may be wrong...):
Printing to file gives you a .ps file not a .pdf, despite the fact that
you
have given it a .pdf extension. The resulting file can be processed by
Distiller to give a real .pdf file.
You can see this by opening the apparent .pdf in a text editor and
comparing
it to a "real" .pdf file.

The easiest way is to by pass this and create a .pdf directly, so forget
the
printToFile and filename
The name of the workbook will be used for the file name and the
destination
folder will be dependent on the port, as shown in the PrintersAdobe
PDFPropertiesPorts. You can add another port if you want another
location.

There are other settings in the pdf print driver that may interfere with
this, one being "Prompt for Adobe PDF filename" which you need to
uncheck.

NickHK

"Ana" wrote in message
...
Hi
Like that I can create Test.pdf but I can not open it , it says that
the
file is not correct :o(


"Tom Ogilvy" wrote:

have you tried

Sheets(Array("1", "2", "3", "4", "5", "6", "7", "8", "9", "10",
16" )).Select
Application.ActivePrinter = "Acrobat Distiller sur RPT1:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:=
_
"Acrobat Distiller sur RPT1:", Collate:=True,
PrintToFile:=True,
_
PrToFileName:="C:\Test.PDF"


--
Regards,
Tom Ogilvy

"Ana" wrote:

Hi ,
I have a macro and at the end I create a pdf file using the
following:
Sheets(Array("1", "2", "3", "4", "5", "6", "7", "8", "9", "10",
16" )).Select
Application.ActivePrinter = "Acrobat Distiller sur RPT1:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1,
ActivePrinter:= _
"Acrobat Distiller sur RPT1:", Collate:=True

but like this I have to wait until I am asked where to save the
file
and
with what name .... my question is is it possible to save the file
in
pdf
with a certain name in a certain folder witout being asked .

What I have to change in my code to save the pdf file "test.pdf"
in
c:\Index ?

thanks
Ana