Office: Bedingtes ein- und ausblenden von Spalten trotz Blattschutz

Schnecker2310 · 20. März 2018

Hallo,

ich möchte bei einer Tabelle mit Blattschutz, dass die Spalte "AF" bei erfüllter Bedingung (AF10=0) aus-, bei nicht erfüllter Bedingung (AF=1) eingeblendet wird. Danach soll automatisch der Blattschutz wieder aktiviert werden.
Das Tabellenblatt ist mit einen Blattschutz versehen (Passwort: test).

Wie kann ich das erreichen? Ich habe eine Beispieldatei beigefügt......

Kann mir jemand helfen?

Vielen Dank und viele Grüße,

Maggus

:)

Hajo_Zi · 22. März 2018

Code:

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
Dim wksBlatt As Worksheet
ActiveSheet.Unprotect "test"
If Target = Range("AF10") Then
Select Case Target.Value
Case Is = 0
wksBlatt.Columns("AF").Hidden = True
Case Is = 1
wksBlatt.Columns("AF").Hidden = False
End Select
End If
ActiveSheet.Protect "test"
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Schnecker2310 · 22. März 2018

Hallo Hajo,

vielen Dank für die schnelle Rückmeldung.

Das funktioniert so leider noch nicht (es wird nichts ein-bzw. ausgeblendet).

Zudem ist das Passwort "test" nur ein Beispiel, soll also nicht "wörtlich" im Makro hinterlegt werden, wenn du verstehst, was ich meine....

Viele Grüße,

Maggus

Hajo_Zi · 22. März 2018

ich bin davon ausgegangen das Dein Code geht, das hattest Du ja geschrieben.
die Variable wksBlatt ist nicht belegt.

Dein Winsch lässt sich nicht realisieren.

Office: Bedingtes ein- und ausblenden von Spalten trotz Blattschutz

Bedingtes ein- und ausblenden von Spalten trotz Blattschutz

Bedingtes ein- und ausblenden von Spalten trotz Blattschutz

Bedingtes ein- und ausblenden von Spalten trotz Blattschutz

Bedingtes ein- und ausblenden von Spalten trotz Blattschutz - Similar Threads - Bedingtes ausblenden Spalten

Bedingte Formatierung / Wiederholungen "ausblenden"

Bedingte Formatierung mit ausblenden

Zellenhinhalt bei bedingter Formatierung ausblenden

Detailbereich im Bericht bedingt ausblenden

Spalten Ausblenden als Bedingte Formatierung

Formatierungen bedingt ein- und ausblenden klappt nur halbwegs

Formel oder bedingte Formatierung zum Ausblenden