Originally Posted by
pbaldy
No problem; post back if you get stuck.
Dear Paul,
I am unable to return back to the selected record.
Probably I am wrong on the code
Code:
Private Sub Form_Close()
Dim rs As Object
Dim lngBookmark As Long
'set a variable to the current record
lngBookmark = Me.[Order Code]
'requery the form
Me.Requery
'bring us back to the original record
Set rs = Me.RecordsetClone
rs.FindFirst "[Order Code] = " & lngBookmark
Me.Bookmark = rs.Bookmark
Set rs = Nothing
'Private Sub Form_Close()
'Forms!Orders.Requery
'DoCmd.GoToRecord , , acLast
End Sub