VBA Export PDF Help

[Spaceman88]

' Macro12 Macro
    Sheets("Sheet1").Select
    Range("A1:X40").Select
    Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
    "C:\Users\craig\OneDrive - Van Elle\Desktop\1231.pdf", Quality:= _
    xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
    OpenAfterPublish:=True
End Sub