根据复选框选择隐藏/取消隐藏整行

Question

我想根据是否选中复选框来隐藏特定行。

我有这段代码，但它似乎不起作用。

我右键单击复选框，并分配了这个宏：

Private Sub CheckBox68_Click()
    If CheckBox68 = True Then
        [24:26].EntireRow.Hidden = False
    End If
End Sub

我不确定为什么它不起作用。有人能看出它有什么问题吗？

非常感谢提前 抗体

Answer 1

您的代码中没有隐藏行的地方。 您需要进行如下修改：

Private Sub CheckBox68_Click()
    [24:26].EntireRow.Hidden = Not CheckBox68.value
End Sub