表单控件复选框隐藏/取消隐藏行异常：无法取消隐藏行

嘿，我来帮你排查这个问题！你的VBA代码能正常隐藏第10行，但没法取消隐藏，核心问题大概率出在复选框和单元格C84的联动逻辑上，下面给你拆解原因和解决方案：

可能的原因1：复选框未正确绑定到C84单元格 #

你用的是表单控件复选框，默认情况下它的状态不会自动同步到C84单元格。如果你的代码依赖Range("C84").Value来判断，那必须先把复选框和这个单元格绑定：

• 右键点击表单控件复选框，选择「设置控件格式」
• 切换到「控制」选项卡，在「单元格链接」输入框中填入$C$84，点击确定

这样复选框的勾选状态才会实时同步到C84单元格，代码的判断逻辑才能正常触发取消隐藏的操作。

更简洁可靠的解决方案：直接引用复选框状态 #

其实不用绕单元格，直接读取复选框的状态来控制行的显示/隐藏会更可靠，避免联动出错的问题。修改后的代码如下：

Sub CheckBox1_Click()
    ' 勾选复选框时显示第10行，取消勾选时隐藏
    Rows("10:10").EntireRow.Hidden = Not CheckBox1.Value
End Sub

这个逻辑很直观：Not CheckBox1.Value会把复选框的True（勾选）转为False（不隐藏行），False（取消勾选）转为True（隐藏行），一步到位完成需求。

额外排查点 #

如果绑定单元格后还是有问题，可以检查：

• 有没有其他VBA代码或公式修改了C84单元格的值，干扰了判断逻辑
• 第10行是否被其他设置锁定隐藏（比如工作表保护状态下，隐藏行的操作可能受限）

内容的提问来源于stack exchange，提问作者rob