This is the VBA code I used and it worked great! Of course I had to change a little of the wording to match my sheet.
Private Sub CheckBox1_Click()
Dim check As OLEObject
Set check = Sheets("FEBRUARY").OLEObjects("CheckBox1")
If check.Object Then
Rows("34:34").EntireRow.Hidden = False
Else
Rows("34:34").EntireRow.Hidden = True
End If
End Sub
|