Używam następującego kodu do eksportowania wybranych arkuszy z Excel 2010 do jednego pliku PDF ...

ThisWorkbook.Sheets(Array("Sheet1", "Sheet2", "Sheet3")).Select

ActiveSheet.ExportAsFixedFormat _
        Type:=xlTypePDF, _
        Filename:="C:\temp.pdf", _
        Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, _
        IgnorePrintAreas:=False, _
        OpenAfterPublish:=True

Moim problemem jest to, że eksportuje tylko pierwszy arkusz. Jakieś pomysły?