Reputation: 23
As it seems that Excel 2013 allow for direct Save as to PDF format, how can in perform this using VBA code ? I would like to build a macro that will automatically create a PDF from a worksheet (with the name of the file being passed as String variable). Many thanks to you all
Upvotes: 1
Views: 20609
Reputation: 2693
Try
Dim fp As String
Dim wb As Workbook
fp = "C:\temp\foo.pdf"
Set wb = ActiveWorkbook
wb.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=fp, _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False
*Note that ExportAFixedFormat
must have all its variables on one line or it will not compile.
**Note that the '_' characters should allow this to compile whilst not being all on one line
Upvotes: 3