Better way to unhide/hide multiple sheets

I have a macro that I want to unhide 10 sheets print based on a formula (as I need to unhide them before I can print them I believe) then hide them again

right now I have the following line 10 times to unhide the sheets.

Sheets("Don't Unhide Motor Report (1)").Visible = True
Sheets("Don't Unhide Motor Report (2)").Visible = True

etc to 10

is there a better way to write this? or am I stuck with these 10 lines at start and then 10 "hide" lines at the end?