Re: Is There A Way to Pop Up a MessageBox Warning When User Changes Data?



Put an event procedure on the on change event.

Then put the following code in the event procedure:

Field - is the name of the field on the form. Change this to the field
name that is on your form.

Private Sub Field_Change()

If MsgBox("do you want to change this ?", vbYesNo) = vbNo Then
Me!Field.Undo
End If

End Sub

.



Relevant Pages

  • RE: Check boxes selected enters several responses
    ... You might try typing an apostrophe before the DoCmd in the Event procedure ... to track all staff working on a single record in a given day. ... Private Sub List4_AfterUpdate ... reviewing the record and identifying the persons who entered data: ...
    (microsoft.public.access.forms)
  • Re: AfterUpdate Event (Combo Box)
    ... Private Sub Category_AfterUpdate ... defined function, or [Event Procedure] ... Both Combo boxes are unbound and in the product combo box in the subform I ...
    (microsoft.public.access.modulesdaovba)
  • Re: control source to update text box
    ... source and the event procedure is still in the events tab. ... the Private Sub Date_Processed_AfterUpdateline, ... of the reference # text box. ... Also check that the control source for the textbox that receives ...
    (microsoft.public.access.formscoding)
  • RE: Error communicating with the OLE server or ActiveX Control
    ... user-defined function, or. ... It doesn't seem to matter what code I have in the OnClick Event Procedure. ... Private Sub CancelQueryCmdButton_Click ... MsgBox because it's so simple and I thought I couldn't get that wrong, ...
    (microsoft.public.access.formscoding)
  • Re: control source to update text box
    ... Here is what I have in the event procedure for afterupdate on ... Date Processed: Private Sub Date_Processed_AfterUpdate ... form I changed the control source for the [reference #] to ...
    (microsoft.public.access.formscoding)