VBA Worksheet_Change 如何隐藏其中具有特定值的行答案

【问题标题】：VBA Worksheet_Change how to hide rows that got certain value in itVBA Worksheet_Change 如何隐藏其中具有特定值的行
【发布时间】：2019-02-09 04:43:25
【问题描述】：

伙计们，你能帮我解决我的问题吗？我需要做的是编写代码，它将隐藏整行，例如，如果 B10 中的值为 = 100。

提前致谢

【问题讨论】：

标签： excel vba range row hide

【解决方案1】：

试试这样的

If Range("B10").Value = 100 Then
Range("B10").EntireRow.Hidden = True
End If

【讨论】：

您的代码可以简化为： Range("B10").EntireRow.Hidden = (Range("B10").Value2 = 100)

【解决方案2】：

我想我解决了我的问题。用过这个（不知道有没有什么不必要的）：

Private Sub Worksheet_Change(ByVal Target As Range)
Dim LastRow As Long, c As Range

Application.ScreenUpdating = False
Application.EnableEvents = False
LastRow = Cells(Cells.Rows.Count, "B").End(xlUp).Row
On Error Resume Next
For Each c In Range("B1:B" & LastRow) 
   If c.Value = 100 Then
        c.EntireRow.Hidden = True
    ElseIf c.Value <> 100 Then
        c.EntireRow.Hidden = False
    End If
Next
On Error GoTo 0
Application.ScreenUpdating = True
Application.EnableEvents = True
End Sub

【讨论】：