Gruppe
Ereignis
Problem
Wie kann ich den ursprünglichen Zellinhalt wiederherstellen, wenn in eine Zelle, in der nur Ziffern erlaubt sind, Zeichenfolgen eingegeben wurden?
ClassModule: Tabelle2
Private Sub Worksheet_Change(ByVal Target As Range)
If Not IsNumeric(Target.Value) Then
Application.Undo
Beep
MsgBox "Nur Zahlen erlaubt!"
End If
End Sub