VB code for showing/hiding the following 20 rows?

I have buttons that show and hide specific sets of rows:

Sub COLCHESTER_HIDE()
'
' COLCHESTER_HIDE Macro
'

'
    Rows("255:274").Select
    Selection.EntireRow.Hidden = True
End Sub

Sub COLCHESTER_SHOW()
'
' COLCHESTER_SHOW Macro
'

'
    Rows("254:275").Select
    Selection.EntireRow.Hidden = False
    Range("A255:B255").Select
End Sub

I have 60 locations to do this for!

Is there any way I can just tell excel to hide/show the next 20 rows rather than having to record each macro individually?