Microsoft Excel

Macros Print Activesheet Macros Print Activesheet Private Sub ButtonPrintEpson_Click() Application.ScreenUpdating = False ActiveSheet.PrintOut Application.ScreenUpdating = True End Sub Macros Print To PDF VBA Macros Print To PDF Private Sub ButtonPrint_Click() Application.ScreenUpdating = False ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:="C:\Users\~User~\Documents\norazizah\KalendarPDF.pdf", _ OpenAfterPublish:=False Application.ScreenUpdating = True End Sub