My ActiveX Checkboxes won't hide when the row is hidden

Hi Angela,

The ActiveX checkbox that controls the features is #12
The rows I want hidden are 110-129
The ActiveX checkboxes in those rows are numbered 27-45

Try the following code (all checkboxes are 'Active X'):

Private Sub CheckBox12_Click()

 Const sRowsToHIDE = "110:129"
 
  Dim iCheckBoxNumber As Long
  
  Debug.Print "CheckBox12_Click()  CheckBox12.value = " & CheckBox12.Value
  If CheckBox12.Value = True Then
        Range(sRowsToHIDE).EntireRow.Hidden = False
        For iCheckBoxNumber = 27 To 45
          ActiveSheet.OLEObjects("Checkbox" & iCheckBoxNumber).Visible = True
        Next iCheckBoxNumber
  Else
        Range(sRowsToHIDE).EntireRow.Hidden = True
        For iCheckBoxNumber = 27 To 45
          ActiveSheet.OLEObjects("Checkbox" & iCheckBoxNumber).Visible = False
        Next iCheckBoxNumber
  End If
  
End Sub

--------------------------

There is no linked cell affiliated with Ckbxs 27-45, should there be?

There is no need for a 'linked cell' unless you are going to use the value in the 'linked cell' in a workbook formula somewhere.

I hope this helps. Please let me know if you need any further assistance.

Lewis