Undo issues...why is this not working?

[btj]

In my code, I have a MsgBox that pops up after a field ("Category")has been changed. If the user didn't mean to change said field, then I have a Undo function.

This works fine, but I want the cursor to reselect the initial field. I cannot seem to get this to work. Additionally, I only want to undo that one field's change, but Undo seems to undo all actions.

Please let me know if you know how to undo the last action and if you know how to go back to the field that was just undone.

Thank you in advance.

- Ben

 

[jimmythegeek]

This is the beauty of the BeforeUpdate event. If I have a field named "city", the code would be as follows:

==========
Private Sub City_BeforeUpdate(Cancel As Integer)
If MsgBox("Are you sure you wanted to change this field?", vbYesNo + vbQuestion, " Continue?&quot = vbNo Then
Cancel = True
Me.Controls("City&quot.Undo
End If
End Sub
========== Jim Lunde
compugeeks@hotmail.com
We all agree your theory is crazy, but is it crazy enough?

 

[btj]

Of course...thanks so much for the quick and much needed response.

-Ben