1. 程式人生 > >VBA-另存為pdf

VBA-另存為pdf

Sub 另存為pdf()
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        "C:\Users\zgjxg\Desktop\" & Worksheets(2).Range("c4").Value, Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
        False
End Sub