As posted in OZGRID (can't post the link)


Used the following:

[VBA]Sub SavePDFMacro()

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"Macintosh HD:Users:Mach7esktop:" & Range("AA1").Value, Quality:= _
xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
OpenAfterPublish:=True
End Sub

[/VBA]

The set print area should be saved as a PDF file onto the desktop using as file name the value found in Cell AA1.
The code is doing just that. No issue here.

I would like to adjust the paper size and the margin as to maximize the appearance.
Right now I get a pdf that is either a A4 or a 8.5 by 11.
Any suggestion to force the pdf to save as legal that is 8.5 by 13 (215.9 by 330.91 mm). Note Excel is already using this size as default, however the created PDF does not.

Thanks for your suggestions.