how to hide and unhide rows using 2 buttons

[Eerised]

I need help..

i have 2 buttons "Calendar Period and Accounting Period, i use the code below to hide the Accounting Period

Private Sub Calendar_Period_Click()
Dim myRng As Range


Set myRng = Me.Range("a21:g32")


myRng.EntireRow.Hidden = Not (myRng(1).EntireRow.Hidden)


End Sub

can you please help me on how to code if i click on the Accounting Period button; the Calendar Rows will hide and will unhide the Accounting Period columns.

thanks