Laufzeitfehler 2448 nur einmal, beim nächsten Betätigen tritt er nicht mehr auf.

[Carl]

Hallo,

ich habe ein Endlosformular und darin verschiedene Felder. Eines der Felder ist ein Button und passwort-geschützt mit:

Code [Auswählen] Erweitern

Dim Passwort As String
Passwort = InputBox("Als AEAP-Freigeben?", "Freigeben", "")
If Passwort <> "Baum" Then Exit Sub
Me.istAEAP = True
DoCmd.RunCommand acCmdSaveRecord

Diese Code funktioniert normal. Aber wenn ich zuvor EIN ANDERES Feld ändere und danach diesen Button drücke, kommt der Fehler 2448 und "Sie können diesem Feld keinen Wert zuweisen". Breche ich ab und betätige den Button erneut, läuft alles wieder unproblematisch. Es ist sozusagen ein "nur Einmal-Fehler".

Was könnte das sein?
Carl

[Beaker s.a.]

Warum verheimlichst du uns das Event, dass diesen Code auslöst?

[Carl]

Es löst aus:

Code [Auswählen] Erweitern

Me.istAEAP = True

Also setzt ein Feld auf True

Carl