Macro for Print Order

[KAJ31]

Would like to print worksheets to PDF in a specific order. Current array prints the files, but put them in the order of how the tabs are arranged, not how listed in macro. Is there way to get the printouts inthe order needed?

Sub Print_PDF_Region1()

Sheets(Array("SOO R1", "HIST R1", "Hourly R1", "FORECAST R1", "SOO R1 2100", "HIST R1 2100", "HOURLY R1 2100", "FORECAST R1 2100", "SOO R1 2500", "HIST R1 2500", "HOURLY R1 2500", "FORECAST R1 2500", "SOO R1 4200", "HOURLY R1 4200", "HIST R1 4200", "FORECAST R1 4200", "SOO R1 R100", "FORECAST R1 R100")).Select
            
  ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        "Q:\P7 Region 1.pdf", Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
        False
End Sub

 

[BobUmlas]

Do them one at a time, or rearrange the tabs before printing and put them back in the original order afterwards

 

[KAJ31]

I am hoping to automate this, as there a 50+ tabs