Spalten ausblenden wenn Zelle B2 bestimmte Werte aufweist

[omron2003]

Hallo Forum,

ich suche eine Möglichkeit in Tabelle1
die Spalten S:V auszublenden wenn Zelle B2 Leer oder die Werte A oder B oder C stehen.
Steht in der Zelle B2 aber der Wert D, sollen die Spalten S:V eingeblendet werden.

Besten Dank im Voraus
Omron2003

[Flotter Feger]

Hallo,

so ...

PHP-Code:

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address(0, 0) <> "B2" Then Exit Sub

With Worksheets("Tabelle1")
    Select Case Target.Text
        Case "", "A", "B", "C"
            Columns("S:V").Hidden = True
        Case "D"
            Columns("S:V").Hidden = False
    End Select
End With
End Sub 


Der Code ist sensitiv ... mit kleinen Buchstaben klappt es nicht.

[omron2003]

Super,

Besten Dank funktioniert genau so wie ich es mir vorgestellt habe.
Meine Vorgaben sind mit Grossbuchstaben, somit kein Problem.

LG
Omron2003