勾选控件隐藏对应行，在多选的情况下隐藏显示不正确，求指导

gc6699

插入的ActiveX 控件勾选隐藏行，在多选的情况下显示不正确，求指导
vba进行控制勾选哪个控件，对应的隐藏哪一行。单独勾选没有问题，可是在多项勾选的情况下，隐藏行显示隐藏逻辑不对，求教怎么进行优化，感谢！

这是单独隐藏的vba代码

Private Sub CheckBox1_Click()
ActiveSheet.Rows("8:8").Hidden = CheckBox1
End Sub
Private Sub CheckBox2_Click()
ActiveSheet.Rows("8:8").Hidden = CheckBox2
End Sub
Private Sub CheckBox3_Click()
ActiveSheet.Rows("7:7").Hidden = CheckBox3
End Sub
Private Sub CheckBox4_Click()
ActiveSheet.Rows("8:8").Hidden = CheckBox4
End Sub

蓝桥玄霜

多选是需要逻辑的，复选框3与其它的是不能同时选择的。

gc6699

蓝桥玄霜 发表于 2023-3-21 19:59
多选是需要逻辑的，复选框3与其它的是不能同时选择的。

老师我测试了下感觉表现不对，我原来的对于一个一个的勾选情况是能实现隐藏不需要的行的，但唯一的一点是当您说的复选框3和其他复选框任何一个或多个同时勾选时，按我实际需求是要两行同时保留着，因为两行都要填信息时就不用隐藏了，可是按我现在的如果复选框3和其他复选框任何一个或多个同时勾选时，两行都隐藏了，不应该是隐藏而应该是都显示，请问老师怎么配置？根据您的我实操下来显示隐藏也不太正确。请老师再次指教万分感谢！

实际的需求就是勾选复选框3时，隐藏第7行；分别或一起勾选复选框1、2、4时，隐藏第8行；同时勾选复选框3和除3之外的任何一个或多个（即又有通讯咨询，又有其他的组织形式同时存在的情况），7、8行都不隐藏。请老师指教，感谢！