Gerne würde ich eine Zelle via VBA-Code prüfen. Es sollte nur ein "x" oder ein "X" drinstehen.
Wenn ein anderer Wert eingegeben wurde soll der Benutzer mit einer Msgbox informiert werden.
Weiss jemand wie das gehen könnte?
Danke Euch
Gruss
Doc
Private Sub Worksheet_Change(ByVal Target As Range) Application.EnableEvents = False If Not Intersect(Target, [A1]) Is Nothing And Target.Count = 1 Then If LCase(Target) <> "x" Then MsgBox "Nur ein X ist zugelassen!" End If End If Application.EnableEvents = True End Sub Gruss Jürgen |