You can use bookmarks to save the position of a certain record, so that you
can return to it at another time. To save a position, all you need to do is
go to the position you want to save save the value of Data1.Recordset.Bookmark
to a Variant variable. Then to return to that position, set the
Data1.Recordset.Bookmark
property to the contents of the variable:
Dim varBookmark As Variant '// bookmark variable
varBookmark = datTitles.Recordset.Bookmark '// save the position
datTitles.Recordset.FindFirst "ISBN = '0-0131985-2-12'"
If datTitles.Recordset.NoMatch = True Then
'// we will have been brought to the first record. Go back
to the record we were at
datTitles.Recordset.Bookmark = varBookmark
MsgBox "No match found"
End If
Comments