Office: Während der Eingabe überprüfen ob Zahl oder Text

Hallo,
wenn ich in einem Zahlenfeld einen Text eingebe erfolgt folgende Meldung

Wie kann ich die Meldung abfangen um eine eigene Meldung auszugeben?
Das Zahlenfeld ist mit 0 vor belegt und soll über ein Formular geändert werden. Ich habe verschiedene Ereignisse ausprobiert aber die Accessmeldung kommt immer zuerst.
Mit: If IsNumeric(Zahlenfeld) = False Then
hatte ich keinen Erfolg da das Zahlenfeld mit 0 vor belegt ist.
Vielleicht hat jemand den richtigen Tip für mich.
Vielen Dank und liebe Grüße Matthias

 

Moin,

wo überprüfst Du die Eingaben denn, im "nach Aktualisierung" des Feldes? Vielleicht mal Before_Update probieren.
Wodurch ist das Feld denn accesstechnisch auf Zahlen festgelegt? Weil an Datensatz gebunden?

Gruß
Doming

 

Hallo Doming,
ich habe probiert:
vor Aktualisierung
nach Aktualisierung
bei Geändert
bei Änderung.
Access scheint schneller zu sein als die Ereignisprozedur.
Das Feld wird im Formular von einer Abfrage bereit gestellt, die auf eine Tabelle beruht und in der Tabelle ist das Feld als Zahl definiert.
Selbst mit On Error - Fehlerbehandlung schaffte ich es nicht die Accessmeldung abzufangen.

 

Sorry Doming,

die Lösung ist beim Formular: Bei Fehler zu finden.

Private Sub Form_Error(DataErr As Integer, Response As Integer)
Select Case DataErr
Case Is = 2113
If Screen.ActiveControl = [Zählmenge] Then
MsgBox "Bitte nur Zahlen eingeben. Bitte wiederholen Sie Ihre Eingabe!", vbInformation, "So wird das nix"
Response = acDataErrContinue
Me!Zählmenge.Undo
Exit Sub
End If
End Select
End Sub

Vielen Dank für deine Mühe und Zeit.

 

Hm, bin jetzt aus dem Bauch heraus auch überfragt.
Workaround wäre, das Feld auf unsichtbar zu stellen und ein ungebundenes zur Verfügung zu stellen. Nach Eingabe eines gültigen Werts diesen auf das "richtige" Feld weitergeben.

Oder ist für das ursprüngliche Feld eine Gültigkeit vorgegeben?

edit - ah- Lösung wurde gefunden, okay. (Das nächste mal bitte in code-Tags schreiben)
Gruß
Doming

 

versuche, über das Ereignis 'key down' die Eingabe zu prüfen. Fall tatsächlich nur Ziffern erlaubt sein sollen, so würde ich mittels select case keycode (case 0 to 9) ansonsten mittels isnumeric(keycode) den Check durchführen