Office: (Office 2010) MsgBox mit ja/nein

Hallo,

es ist schon etwas her, dass ich in Access war gemacht habe. Daher hoffe ich auf eure Hilfe.

Beim Beenden eines Formular möchte ich prüfen, ob das Feld "Requali_Nr" leer ist oder nicht. Hier muss der User dementsprechend reagieren.


Code:

Wenn der User auf JA in der MsgBox klick soll das Formular geschlossen werden und die eingaben die er bis dahin gemacht hat nicht gespeichert werden. Wenn der User auf "NEIN" klickt soll er zum Formular zurück kehren und seine Eingaben vervollständigen.

Leider fällt mir der Code nicht ein. Es ist wahrscheinlich zu lagen her.

Hätte jemand von euch eine Idee?

:)

 

Moin,
hilft dir das weiter: donkarls Access-Seiten?
maike

 

Hallo,

so:
Code:

 

Hallo zusammen,

also es war nicht ganz, das was ich suche aber es geht ja schon in die Richtung.

Beim Klicken auf den Button exit, soll geprüft werden, ob das Feld "Reauali_NR" leer ist. Falls dieses Feld leer ist, soll eine MsgBox aufgehen, die den User fragt ob er ohne die Daten zu speichern raus gehen möchte. Somit klick er auf "Ja" wenn er auf nein klickt soll zurück zum Formular. Letztendlich wenn das Feld Requali_Nr befüllt ist, soll die MsgBox nicht aufgehen.

 

Wie sieht denn dein überarbeiteter Code jetzt aus?
"Ohne zu speichern" geht imho nur im Ereignis BeforeUpdate des Formulars oder du musst die Daten wieder löschen.
maike

 

Hallo Maike,
Bist du sicher mit "nur"? Solange das Form Dirty ist kann man IMO auch mit einem
Buttonklick Eingaben überprüfen.
Luftcode:
Code:

gruss ekkehard

 

Hi Ekkehard,
und wenn der User es vorzieht, den Button nicht zu klicken *grins ?
maike

 

Tja, dann muss eben BeforeUpdate auch noch rein.

 

Hallo zusammen,

also das mit dem speichern habe ich anders gelöst.

Für das speichern des Datensatzes habe ich einen eigenen Button.

Derzeit sieht mein Code so aus:

Code:

Dieser funz. ja aber nicht richtig. Jetzt fehlt mir nur noch der Passus , wenn man auf JA klick, das das Formular beendet wird bei NEIN soll zurück zu Formular navigiert werden.

 

ich hoffe jetzt passt es

 

So, ich habe es hinbekommen.
Und zwar so.


Code:

End If

 

Hallo Marcy,

Was für eine Steinzeit-Version von Access verwendest du denn? *wink.gif*
Ich kann gar nicht glauben, dass das in den neueren Versionen noch unterstützt wird; -
wird aber!

Verwende besser DoCmd.RunCommand.

gruss ekkehard


P.S. Ich vermute, dass der Macro-zu-VBA-Assistent das immer noch so umsetzt.

 

Hi,

den Code habe ich noch von Acc2000

Gruß
Martin

 

Da war der auch schon Steinzeit. Mal abgesehen davon, dass das kein A.... versteht, was der Befehl macht *wink.gif* .
maike

 

Hallo Maike,
Ich A... schon: acSaveRecord
gruss ekkehard