Checkbox Macro to Hide/Unhide Rows Not Working Properly

I have a checkbox that I am trying to use to hide and unhide rows. The rows start off hidden, and the aim is to have the rows revealed when the checkbox is checked and then hidden again if the checkbox is unchecked. The code I am using is below. Rather than unhiding and hiding the rows as I'd like, the code does nothing. When I switch the spots of the "1" and "0" as seen below, it will unhide the rows when the checkbox is checked, but it won't re-hide the cells when it is unchecked.

Code that does nothing:

Please Login or Register  to view this content.

Code that unhides but does not re-hide rows:

Please Login or Register  to view this content.

What am I missing/doing wrong with the macro to get it to perform as I'd like?

Hi,

Try changing the = 1 to =True, and =0 to = False

Incidentally we have a forum rule about wrapping code in code tags to make it easier to read, particularly with large procedures. I'll edit your post sibce you're new here but please remember the next time.