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

Question

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

预先感谢

Answer 1

尝试这样的事情

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

Answer 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