Saving as a PDF on the active workbook Path and name same as active workbook name

[subbby]

Hello All,

I have a code that sets page breaks, print area and saves as PDF. It is as follows

Please Login or Register  to view this content.

The above code asks the user to pick a location.

But this time I want the code to

• Use the activeworkbook's path and name and save it there.

I tried

Please Login or Register  to view this content.

It didn't seem to work : Error Message was "Application defined or object defined error"

Any help is much appreciated

Thanks,

Subbby

[Kenneth Hobson]

Where did you get xlQualityHigh? You can use xlQualityMinimum or xlQualityStandard.

You can not save an Excel file as a PDF. You can export it to PDF.

The Immediate Window in the VBE shows the results of Debug.Print after a run. From that you can see that you need to replace .xlsm with .pdf in the export. Of course that fails in the export if you have not saved the Excel file first.

A shortened version of yours for illustration.

Please Login or Register  to view this content.

[subbby]

Where did you get xlQualityHigh? You can use xlQualityMinimum or xlQualityStandard.

You can not save an Excel file as a PDF. You can export it to PDF.

The Immediate Window in the VBE shows the results of Debug.Print after a run. From that you can see that you need to replace .xlsm with .pdf in the export. Of course that fails in the export if you have not saved the Excel file first.

A shortened version of yours for illustration.

Thank you, that worked like a charm.

Appreciate your time and explanation.

Helps a lot

Thanks again

Reputation star added !

-Subbby

[subbby]

Where did you get xlQualityHigh? You can use xlQualityMinimum or xlQualityStandard.

Not sure where I got it. I did try xlQualityStandard. However, xlQualityHigh did not yield any error messages.