Spalten ausblenden bei Bedingung
15.10.2020 15:45:15
Thomas
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
Anzeige