☰

Скрытие строк с помощью VBA

tag-icon • tag-icon microsoft-excel microsoft-excel-2010 vba macros
Скрытие строк с помощью VBA

Я попытался ответить на предыдущий вопрос относительно скрытия строк на основе значения ячеек (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

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

решение1

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

Связанный контент