save an array of sheets to PDF

[treygon]

As you know, Excel 2007 has a save as pdf feature built into it. I have 10 different worksheets in my workbook, however, I only want five of those sheets to be saved as one single pdf.

Any ideas? This is what I've tried so far...

Sub savePDF()
dim testing as string
testing = "testing" 
   
    Worksheets(Array(1,3,4,7,8)).ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
       "C:\Users\Trey Oler\Desktop\Delete\" & testing, Quality:= _
        xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
        OpenAfterPublish:=True

End Sub

Thanks for the help.

 

[treygon]

As you know, Excel 2007 has a save as pdf feature built into it. I have 10 different worksheets in my workbook, however, I only want five of those sheets to be saved as one single pdf.

Any ideas? This is what I've tried so far...

Sub savePDF()
dim testing as string
testing = "testing" 
   
    Worksheets(Array(1,3,4,7,8)).ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
       "C:\Users\Trey Oler\Desktop\Delete\" & testing, Quality:= _
        xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
        OpenAfterPublish:=True

End Sub

Thanks for the help.

Is this possible?