VBA Code to convert outlook mail to PDF

[Mahesh Babu]

Hi Experts,

I have a VBA script convert an email to PDF. But am getting the below Debug error.

Please help me out in resolving the error.

'Save as pdf
wrdApp.ActiveDocument.ExportAsFixedFormat OutputFileName:= _
strCurrentFile, ExportFormat:= _
wdExportFormatPDF, OpenAfterExport:=False, OptimizeFor:= _
wdExportOptimizeForPrint, Range:=wdExportAllDocument, From:=0, To:=0, _
Item:=wdExportDocumentContent, IncludeDocProps:=True, KeepIRM:=True, _
CreateBookmarks:=wdExportCreateNoBookmarks, DocStructureTags:=True, _
BitmapMissingFonts:=True, UseISO19005_1:=False

Attached is the The Code

[Ken Puls]

What version of Outlook are you using?

Try shortening it to:

wrdApp.ActiveDocument.ExportAsFixedFormat OutputFileName:=strCurrentFile, ExportFormat:=wdExportFormatPDF, OpenAfterExport:=False