I have a spreadsheet with lots of pages, and will like to print into PDF
format.

Below is the macro I used,
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"CutePDF Writer on CPW2:", PrToFileName:=("Test.pdf")

Everything work fine, the only problem is the PDF file size is 0k and can't
be open. When I manual print out the PDF, there is not problem.
Hope that someone can help...

Not sure I understand what is not working?

"The pdf size is 0k and can't be opened" and "When I manual print the PDF,
there is no problem"

Sounds like the pdf driver is either not working correctly or needs
updating.

--

Regards,
Nigel
(E-Mail Removed)



"law8787" <(E-Mail Removed)> wrote in message
news:F1BED9BD-B2CB-4ED3-858C-(E-Mail Removed)...
>I have a spreadsheet with lots of pages, and will like to print into PDF
> format.
>
> Below is the macro I used,
> ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
> "CutePDF Writer on CPW2:", PrToFileName:=("Test.pdf")
>
> Everything work fine, the only problem is the PDF file size is 0k and
> can't
> be open. When I manual print out the PDF, there is not problem.
> Hope that someone can help...
>

Hi Nigel,
tks for your reply. What i mean is the macro can run properly and create the
"Test.pdf", but the created "Test.pdf" file size is ZERO and cant be open.
Even i use the adobe Acrobat Ver8 as active printer, same problem with the
created file (file size is 0 and cant be open to view by adobe Acrobat Ver8).
If I manual print the file using CutePDF Writer or Adobe PDF, there is not
problem for me to open the file for Viewing.

Regards,
Law8787
(E-Mail Removed)

"Nigel" wrote:

> Not sure I understand what is not working?
>
> "The pdf size is 0k and can't be opened" and "When I manual print the PDF,
> there is no problem"
>
> Sounds like the pdf driver is either not working correctly or needs
> updating.
>
> --
>
> Regards,
> Nigel
> (E-Mail Removed)
>
>
>
> "law8787" <(E-Mail Removed)> wrote in message
> news:F1BED9BD-B2CB-4ED3-858C-(E-Mail Removed)...
> >I have a spreadsheet with lots of pages, and will like to print into PDF
> > format.
> >
> > Below is the macro I used,
> > ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
> > "CutePDF Writer on CPW2:", PrToFileName:=("Test.pdf")
> >
> > Everything work fine, the only problem is the PDF file size is 0k and
> > can't
> > be open. When I manual print out the PDF, there is not problem.
> > Hope that someone can help...
> >
>

OK with you now. The only observation I can offer, since the selected
worksheet prints a valid pdf manually, is try setting the print area before
printing.

--

Regards,
Nigel
(E-Mail Removed)



"law8787" <(E-Mail Removed)> wrote in message
news:ABF8B43E-A009-42EA-8FB8-(E-Mail Removed)...
> Hi Nigel,
> tks for your reply. What i mean is the macro can run properly and create
> the
> "Test.pdf", but the created "Test.pdf" file size is ZERO and cant be open.
> Even i use the adobe Acrobat Ver8 as active printer, same problem with the
> created file (file size is 0 and cant be open to view by adobe Acrobat
> Ver8).
> If I manual print the file using CutePDF Writer or Adobe PDF, there is not
> problem for me to open the file for Viewing.
>
> Regards,
> Law8787
> (E-Mail Removed)
>
> "Nigel" wrote:
>
>> Not sure I understand what is not working?
>>
>> "The pdf size is 0k and can't be opened" and "When I manual print the
>> PDF,
>> there is no problem"
>>
>> Sounds like the pdf driver is either not working correctly or needs
>> updating.
>>
>> --
>>
>> Regards,
>> Nigel
>> (E-Mail Removed)
>>
>>
>>
>> "law8787" <(E-Mail Removed)> wrote in message
>> news:F1BED9BD-B2CB-4ED3-858C-(E-Mail Removed)...
>> >I have a spreadsheet with lots of pages, and will like to print into PDF
>> > format.
>> >
>> > Below is the macro I used,
>> > ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
>> > "CutePDF Writer on CPW2:", PrToFileName:=("Test.pdf")
>> >
>> > Everything work fine, the only problem is the PDF file size is 0k and
>> > can't
>> > be open. When I manual print out the PDF, there is not problem.
>> > Hope that someone can help...
>> >
>>

Hi Nigel,
tks for your advise, had try to set the print area, the problem still exist.
Anyone can help???

Regards,
Law8787

"Nigel" wrote:

> OK with you now. The only observation I can offer, since the selected
> worksheet prints a valid pdf manually, is try setting the print area before
> printing.
>
> --
>
> Regards,
> Nigel
> (E-Mail Removed)
>
>
>
> "law8787" <(E-Mail Removed)> wrote in message
> news:ABF8B43E-A009-42EA-8FB8-(E-Mail Removed)...
> > Hi Nigel,
> > tks for your reply. What i mean is the macro can run properly and create
> > the
> > "Test.pdf", but the created "Test.pdf" file size is ZERO and cant be open.
> > Even i use the adobe Acrobat Ver8 as active printer, same problem with the
> > created file (file size is 0 and cant be open to view by adobe Acrobat
> > Ver8).
> > If I manual print the file using CutePDF Writer or Adobe PDF, there is not
> > problem for me to open the file for Viewing.
> >
> > Regards,
> > Law8787
> > (E-Mail Removed)
> >
> > "Nigel" wrote:
> >
> >> Not sure I understand what is not working?
> >>
> >> "The pdf size is 0k and can't be opened" and "When I manual print the
> >> PDF,
> >> there is no problem"
> >>
> >> Sounds like the pdf driver is either not working correctly or needs
> >> updating.
> >>
> >> --
> >>
> >> Regards,
> >> Nigel
> >> (E-Mail Removed)
> >>
> >>
> >>
> >> "law8787" <(E-Mail Removed)> wrote in message
> >> news:F1BED9BD-B2CB-4ED3-858C-(E-Mail Removed)...
> >> >I have a spreadsheet with lots of pages, and will like to print into PDF
> >> > format.
> >> >
> >> > Below is the macro I used,
> >> > ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
> >> > "CutePDF Writer on CPW2:", PrToFileName:=("Test.pdf")
> >> >
> >> > Everything work fine, the only problem is the PDF file size is 0k and
> >> > can't
> >> > be open. When I manual print out the PDF, there is not problem.
> >> > Hope that someone can help...
> >> >
> >>
>

http://www.excelguru.ca/node/21