What procedure runs after a field or form undo?

[Minty]

Okay - that wasn't clear from the pictures, it looked like a relatively simple string concatenations without seeing the underlying machinations.


Based on the Form.Undo (it does state it runs before changes are undone on a form) not helping, here's a leftfield possible use - in the form.undo set a form timer event to do the recalc after 1/2 a second? then turn it back off?

[twgonder]

@Minty, post #16 Look at Hernandez in the Name 4 field and how it's shown in the calculated text box (post #9). Notice how the two calculated textboxes appear based on the same name data.

Using a timer might be a good idea. I've used timers to test if an administrator wants to shut down all forms/updates/reports for some BIG reason.
During development, I turn timers off, so that slipped my mind. The best way is to set some kind of form flag modular variable that an undo was done, and then do all the logic. The overhead to just review a flag every so often shouldn't be too much of a burden. If I can't find a procedure for after undo that is. On the downside, I only run timers every 15 or so seconds, so I'm not sure if users are going to accept that kind of delay (average 7 seconds) after an undo to see the impact.

Likewise, I could add the same checking logic for every field on the form (calling a centralized procedure) so that entering or leaving any field would trigger the recalc. However, this kind of work around drives me nuts when working with Access. Shouldn't have to be. Knowing a value before undo can be useful, but doing something after an undo seems more probable in real applications.

[Minty]

I would only turn the timer on in the form.undo event, then turn it back off once it's been triggered.
That way there is no overhead if the undo isn't ever pressed, and it's only on for a very brief time so it doesn't interfere with anything else.

[moke123]

How are you invoking the undo? If your using the escape key or control + z, you could try capturing the keystrokes and run your code from there.

Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
'set form keyPreview to yes


    If KeyCode = vbKeyEscape Then
        
        'run your code
        
    ElseIf KeyCode = vbKeyControl And Shift = 2 Then
        
        'run your code
        
    End If


End Sub

You can also do it by specific controls instead of form. You'll need to experiment.

[twgonder]

@moke123, post #19 Thanks for that code and idea. I'm still trying to figure out how esc and ctrl+z are supposed to work. Every time I use them, as best as I can recall, I get different results. I'm sure I've seen it undo just the most recent change, with one entry of esc or ctrl+z, and now it seems to do all on the first press. I hate to modify "normal" things that Access does, so as not to confuse seasoned users that have a pattern. (hands thrown up in the air)