This article was previously published under Q198648
Moderate: Requires basic macro, coding, and interoperability skills.
Notice: This website is an unofficial Microsoft Knowledge Base (hereinafter KB) archive and is intended to provide a reliable access to deleted content from Microsoft KB. All KB articles are owned by Microsoft Corporation. Read full disclaimer for more details.
View products that this article applies to.
Dim RS As DAO.Recordset
Set RS = Me.RecordsetClone
RS.MoveLast
If StrComp(Me.Bookmark, RS.Bookmark, 0) = 0 Then
MsgBox "Form is displaying the last record."
End If
Dim RS As Recordset
Set RS = Me.RecordsetClone
RS.MoveLast
If Me.Bookmark = RS.Bookmark Then
MsgBox "Form is displaying the last record."
End If
If Me.Bookmark = RS.Bookmark Then
Keywords: KB198648, kbprb, kbprogramming, kberrmsg