Return to same record after form requery

[BLW]

I have a form for injury claims. When I click a button to close the claim,
the form needs to requery to update all the closed claim information. When I
requery, it brings me back to the first record instead of the one I was
working on.

How do I get it to automatically return to the same record?

BLW

 

[fredg]

I have a form for injury claims. When I click a button to close the claim,
the form needs to requery to update all the closed claim information. When I
requery, it brings me back to the first record instead of the one I was
working on.

How do I get it to automatically return to the same record?

BLW

Let's assume ID is the name of the record's prime key field.

Dim MyId As Long
MyId = Me.ID
Me.Requery
Me.ID.SetFocus
DoCmd.FindRecord MyId, acEntire, , acSearchAll, , acCurrent

 

[BLW]

You are wonderful. Thank you, it worked perfectly.

BLW