Zeilen ein- und ausblenden (die 3.)

Bild

Betrifft: Zeilen ein- und ausblenden (die 3.)
von: Jessica Sundermeier
Geschrieben am: 26.04.2015 12:33:40

Hallo liebes Forum,
und nun die 3. Frage zum Thema Zeilen ein- und ausblenden :D
Ich habe folgenden Code um Zeilen ein- und auszublenden:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$G$34" Then
        Rows("46:48").Hidden = UCase(Target) = "EUR"
    End If
End Sub
Ich möchte jetzt das meine Bedingung zum ein- und ausblenden sich nach Werten richtet. Also zum Beispiel wenn der Wert in "A1" größer als 100 dann Zeile XY einblenden sonst ausblenden.
Vielen Dank für eure Hilfe.
Gruß,
Jessica

Bild

Betrifft: AW: Zeilen ein- und ausblenden (die 3.)
von: Hajo_Zi
Geschrieben am: 26.04.2015 12:35:32
Hallo Jessica


  Rows("46:48").Hidden = Range("A1")>100



 Bild

Beiträge aus den Excel-Beispielen zum Thema "Zeilen ein- und ausblenden (die 3.)"