Hello. I have a file with over 150 tabs. Sheets will be printed to PDF, based on the macro below. I used an array and named each sheet. This works. I would like an easier way, as there is so much room for error when creating and mistyping a sheet name in the macros or excluding. Every tab will be printed to 1 of the 7 pdf Is there way instead of the array to do a loop or a better way? Many thanks!
VBA Code:
Sub Print_PDF_Region1()
'These are all the tabs..
Sheets(Array("SOO LTS R1", "Hourly LTS R1", "FORECAST LTS R1", "SOO LTS R1 2100", "HOURLY LTS R1 2100", "HIST LTS R1 2100", "FORECAST LTS R1 2100", "SOO LTS R1 2500", "HOURLY LTS R1 2500", "HIST LTS R1 2500", "FORECAST LTS R1 2500", "SOO LTS R1 4200", "HOURLY LTS R1 4200", "HIST LTS R1 4200", "FORECAST LTS R1 4200", "SOO LTS R1 R100", "FORECAST LTS R1 R100", "HIST LTS R1")).Select
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"Q:\P7 Region 1.pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
False
End Sub
