You can modify the following code  to do what you want:
' This makes all sheets  visible (ie for calculations to be done)
Sub all_visible()

For Each Sh In Sheets
Sh.Visible = True
Next Sh

End Sub

'This makes the following sheets invisible

Sub invisible1()

Worksheets("Instructions").Visible = False
Worksheets("Rankings").Visible = False

End Sub