Use an array to unhide many sheets at the same time

This will allow you to unhide many sheets at the same time using an array.

For Each ws In Array("Raw Data", "Working Data", "ODW", "WD2", "CR Sev 3-6 pivot") Sheets(ws).Visible = True Next ws

Code Snippits