Сокрытие строк с использованием VBA

Question

Я пытался следовать предыдущему вопросу о сокрытии строк на основе значения ячеек (E19)

Sub HideIR()

If Range("$E$19").Value = "2" Then
        Rows("20:26").EntireRow.Hidden = True
    ElseIf Range("$E$19").Value = "1" Then
        Rows("20:26").EntireRow.Hidden = False
    End If

End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
    If Range("$E$19").Value = "2" Then
        Rows("20:26").EntireRow.Hidden = True
    ElseIf Range("$E$19").Value = "1" Then
        Rows("20:26").EntireRow.Hidden = False

    End If
End Sub

Он будет скрывать ячейки, однако не обновляется, когда я изменяю значения без повторного запуска макроса.

Answer 1

Вам нужно поместить свой код в Sub Worksheet_change модуля кода вашего листа (а не просто модуля общего назначения), чтобы он работал после того, как вы измените любое значение в вашем листе.