Excel VBA to Export Selected Sheets to PDF

by

Once you have Selected a group of sheets, you can use Selection

Consider:

Sub luxation()
    ThisWorkbook.Sheets(Array("Sheet1", "Sheet2", "Sheet3")).Select
    Selection.ExportAsFixedFormat _
        Type:=xlTypePDF, _
        Filename:="C:\TestFolder\temp.pdf", _
        Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, _
        IgnorePrintAreas:=False, _
        OpenAfterPublish:=True
End Sub

EDIT#1:

Further testing has reveled that this technique depends on the group of cells selected on each worksheet. To get a comprehensive output, use something like:

Sub Macro1()

   Sheets("Sheet1").Activate
   ActiveSheet.UsedRange.Select
   Sheets("Sheet2").Activate
   ActiveSheet.UsedRange.Select
   Sheets("Sheet3").Activate
   ActiveSheet.UsedRange.Select

   ThisWorkbook.Sheets(Array("Sheet1", "Sheet2", "Sheet3")).Select
   Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
      "C:\Users\James\Desktop\pdfmaker.pdf", Quality:=xlQualityStandard, _
      IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
      True
End Sub

More Related Contents:

  1. Save multiple sheets to .pdf
  2. excel to pdf ignores print area and calls printer
  3. Extract Data from PDF and Add to Worksheet
  4. Macro to export MS Word tables to Excel sheets
  5. Excel Number Separation [closed]
  6. excel vba compare & copy worksheets from 2 excel files
  7. VBA Stuck after certain loop
  8. Is the . in .Range necessary when defined by .Cells?
  9. How to return a result from a VBA function
  10. Cycle through sub-folders and files in a user-specified root directory [duplicate]
  11. Properly Handling Errors in VBA (Excel)
  12. Autofilter with column formatted as date
  13. Excel vba refresh wait
  14. Excel vba to create every possible combination of a Range
  15. Excel VBA: getting row of clicked button [duplicate]
  16. Excel VBA Filter Change event handler
  17. How to copy only values in excel vba from a range?
  18. How to suppress Update Links warning?
  19. How do we use restful APIs from Excel macros (vba)?
  20. Run a Macro from Another Workbook
  21. Cannot VBA write data to cells in Excel 2007/2010 within a function
  22. Handle “No cells were found” error when filtered range is empty
  23. Excel: the Incredible Shrinking and Expanding Controls [closed]
  24. How to send email to multiple recipients with addresses stored in Excel?
  25. Generate Word Documents (in Excel VBA) from a series of Document Templates
  26. Using Excel VBA Macro To Capture + Save Screenshot of Specific Area In Same File
  27. Delete all data rows from an Excel table (apart from the first)
  28. Excel Hide/Show all tabs on Ribbon except custom tab
  29. Macros Not Showing Up in Macro Table
  30. Excel VBA Run-time Error ‘32809’ – Trying to Understand it

Leave a Comment