HOW TO CREATE SAVE BUTTON IN EXCEL. COPY CODE AND PASTE MODULE. Sub SaveInvoiceAsPDFAndClear() Dim NewFN As Variant NewFN = "E:\AKHILESH AUTO MOBILE\INVOICE DATA\" & Range("H14").Value & ".pdf" ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=NewFN, _ Quality:=xlQualityStandard, IncludeDocProperties:=True, _ IgnorePrintAreas:=False, OpenAfterPublish:=True End Sub