habe folgenden Code um Tabellenblätter aus und einzuschalten.
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = "$L$10" Then
Select Case Target.Value
Case "PT1"
Worksheets("G-2-301-3011-2").Visible = False
Worksheets("G-2-301-3011").Visible = True
Case "PVZ"
Worksheets("G-2-301-3011").Visible = False
Worksheets("G-2-301-3011-2").Visible = True
End Select
End If
End Sub
jetzt brauche ich aber eine zweite Zelle um wiederum
Tabellenblätter ein u. aus
klappt aber nicht
bitte um Hilfe.