Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Wiederherstellung des alten Zellinhaltes bei unerlaubten Werten

Gruppe

Change

Problem

Wie kann ich den ursprünglichen Zellinhalt wiederherstellen, wenn in eine Zelle, in der nur Ziffern erlaubt sind, Zeichenfolgen eingegeben wurden?

Lösung
Geben Sie den Ereigniscode in das Klassenmodul des Arbeitsblattes ein.

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