habe folgenden Code im Forum gefunden, der der Beschreibung nach, fast genau das ist was ich suche:
Wenn B27 "Ja" sollen die Zeilen 28-38 ein- und wenn "Nein" ausgeblendet werden
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(False, False, xlA1) = "B27" Then
Rows("28:38").Hidden = LCase$(Target.Value) = "ja"
End If
End Sub
Den Code habe ich mit einem Rechtsclick auf die Blattregisterkarte und Linksklick auf "Code anzeigen" in das Modul des Blattes eingefügt.
Wenn ich jetzt die Zellen 28-38 manuell ausblende, kann ich sie durch umstellen der Zelle B27 von Nein auf Ja wieder einblenden, nur das Ausblenden wenn das Ja in B27 zum Nein wird funkioniert nicht.
Kann mir jemand den Code umschreiben, so dass auch das Ausblenden wenn B27 "Nein" auch geht?