☰

Ausblenden von Zeilen mit VBA

tag-icon • tag-icon microsoft-excel microsoft-excel-2010 vba macros
Ausblenden von Zeilen mit VBA

Ich habe versucht, einer vorherigen Frage zum Ausblenden von Zeilen basierend auf einem Zellenwert (E19) zu folgen.

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

Dadurch werden die Zellen ausgeblendet, allerdings werden sie nicht aktualisiert, wenn ich Werte ändere, ohne das Makro erneut auszuführen.

Antwort1

Sie müssen Ihren Code inSub Worksheet_changedes Codemoduls Ihres Blatts (nicht nur ein allgemeines Modul), sodass es ausgeführt wird, nachdem Sie einen beliebigen Wert in Ihrem Blatt geändert haben.

verwandte Informationen