根据单元格中的值自动隐藏行

根据单元格中的值自动隐藏行

我的 Excel 电子表格中有一列包含一个公式,该公式计算结果为 0 或 1。一开始,该列中的所有单元格的值都是 1。

我需要隐藏单元格值更改为 0 的整行,然后当值变回 0 时取消隐藏。

有什么方法可以实现这一点?我希望宏能够自动运行;也就是说,只要值发生变化,行就会自动隐藏或取消隐藏。

谢谢!

答案1

应该是这样的

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, [B:B]) Is Nothing Then
        Target.Rows.Hidden = UCase(Target.Value) = "0"
    End If
End Sub

相关内容