Hiding rows, but checkboxes aren't hidden

Hi kid, this is not tested but try

Private Sub Rows_Collapse_Click()
    If Rows_Collapse.Value = True Then
        Me.Range("C92:I95").EntireRow.Hidden = True
    Else
        Me.Range("C92:I95").EntireRow.Hidden = False
    End If
End Sub