ich bräuchte nochmals Eure Hilfe.
Es sollen zwei Spalten ausgeblendet werden, wenn in einer Zelle ein Bedingung erfüllt ist.
Hier dei Varainte die noch nicht funktioniert.
Mit Case Target.value
und 1 bzw. funktioniert es, leider mit Text nicht.
Hat jemand eine Idee?
Tausend Dank und Gruß
Thomas
Private Sub Worksheet_Change(ByVal Target As Range)
If Target = Range("A11") Then
Select Case Target.Text
Case Is = "SPEC 18537" '1
Columns("F:G").Hidden = True
Case Is = "individuell" '2
Columns("F:G").Hidden = False
End Select
End If
End Sub