Gültigkeit
09.03.2007 00:44:59
Ralf
ich möchte in einer umfangreichen Tabelle bestimmte Bereiche auswählen, indem man in eine zelle ein "x" schreibt. Es soll aber nur das "x" möglich sein. Hab' schon mit:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value <> "x" Then
Application.EnableEvents = False
Application.Undo
Application.EnableEvents = True
End If
End Sub
versucht. Funktioniert auch gut, nur kann man leider das "x" nicht mehr löschen, wenn man sich in der Spalte geirrt hat.
Über Add.Validation finde ich keine Möglichkeit einen Text ("x") als Gültigkeit einzugeben. Nur Liste, Datum, Formel etc.
Hat vielleicht jemand 'ne Idee?
Gruß Ralf