diagramm und zeilen ausblenden

Bild

Betrifft: diagramm und zeilen ausblenden
von: sabine
Geschrieben am: 24.09.2015 14:47:30

hallo!
ich habe mit hilfe dieses Forums im Juni unter der überschrift "diagramm oder zeilen ausblenden" ein Excel file erstellt welches auch super funktioniert hat.
es ging dabei darum, in abhängigkeit von einem zellbezug bestimmte zeilen aus- und einzublenden.
heute hat mich ein kollege darauf aufmerksam gemacht dass eine fehlermeldung kommt wenn er die replicates ändern will. nach fehlersuche habe ich erkannt dass das problem nur auftritt wenn der blattschutz aktiv ist.
https://www.herber.de/bbs/user/100369.xlsm
gibt es irgendeine möglichkeit diese fehlermeldung zu umgehen und trotzdem den Blattschutz beibehalten zu können?
vielen dank schon mal im voraus für die Hilfe!
sabine

Bild

Betrifft: AW: diagramm und zeilen ausblenden
von: EtoPHG
Geschrieben am: 24.09.2015 15:14:05
Hallo Sabine,
so?

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$L$4" Then
        Unprotect "DeinPasswort"
        Application.ScreenUpdating = False
        Range(Rows(13), Rows(96)).EntireRow.Hidden = True 'alles ausblenden
        Select Case Target
          Case 2
            Range(Rows(13), Rows(39)).EntireRow.Hidden = False
          Case 3
            Range(Rows(69), Rows(96)).EntireRow.Hidden = False
          Case 4
            Range(Rows(40), Rows(67)).EntireRow.Hidden = False
        End Select
        Application.ScreenUpdating = True
        Protect Password:="DeinPasswort", DrawingObjects:=True, Contents:=True, Scenarios:=True
    End If
End Sub
Den Passwort-String nach Deinem Gusto anpassen!
Gruess Hansueli

 Bild

Beiträge aus den Excel-Beispielen zum Thema "diagramm und zeilen ausblenden"