Sheets to PDF pages

Export multiple sheets as pages in 1 pdf, doc, still rough and not elegant as needed, needs work

' - Export multiple sheets into 1 PDF
Sheets(Array("PDF1", "PDF2", "PDF3")).Select
Sheets("PDF1").Activate
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"D:\ANmar.Systems\WWRutherford\WeeSS v0.24.pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= False

Views 255 Downloads 132

'NotReadyYet', 'export', 'pdf', 'sheets', 'pages', 'tabs', 'save as', 'print', 'report', 'needs work'

ANmarAmdeen
324
Print+Reports VBA-Excel
Revisions

v1.0