Hiding Sheets

[ArbiterWolf]

I have a excel workbook with about 60 sheets. I have a sheet that you input page numbers into and it separates the info onto the different sheets depending on the different info tied to particular page numbers. So I have a "Total" qty # of pages on every sheet. I would like to have all the sheets hidden until the total is >0.

So I currently have this code on the sheet you input the info on.

Sub Worksheet_Change(ByVal Target As Range)
Application.Volatile
If Sheet5.Range("C58").Value > 0 Then
Sheet5.Visible = True
Else
Sheet5.Visible = False
End If
End Sub

And it works exactly how I want it but what I want to know is if there is a easier way to apply this code to all the sheets? Or do I have to copy this code 60+ times for each individual sheet?
So the "total" cell is in the same cell for the first 20 sheets then in the same for the rest. 1-20 its C58 21-60 its E60.

 

[BSALV]

the triggersheet and the triggercell were indeed something you had to adapt to your situation.
You never said what the real trigger was, so that was an assumption.

 

[johnnyL]

The following was going to be what I suggested:

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
'
    Dim CodeNameNumber          As Long
    Dim CodeNameSheetChanged    As String
'
    CodeNameSheetChanged = Sheets(Sh.Name).CodeName
    CodeNameNumber = Val(Right(CodeNameSheetChanged, Len(CodeNameSheetChanged) - 5))
'
        If CodeNameNumber < 21 Then
            If Sheets(Sh.Name).Range("C58").Value > 0 Then
                Sheets(Sh.Name).Visible = True
            Else
                Sheets(Sh.Name).Visible = xlSheetVeryHidden
            End If
        Else
            If Sheets(Sh.Name).Range("E60").Value > 0 Then
                Sheets(Sh.Name).Visible = True
            Else
                Sheets(Sh.Name).Visible = xlSheetVeryHidden
            End If
        End If
End Sub

That was assuming that CodeNames of sheets were being looked at & the codeNames of the sheets are all Sheetx.

But the OP is satisfied, so no reason to post it.