Microsoft Access: Find a record by listbox selection

Platform:Microsoft Access
Task:Find a record by listbox selection
Discussion:
You want to navigate records using a listbox.
Example:
    ' Find the record that matches the control.
    Dim rs As Object

    Set rs = Me.Recordset.Clone
    rs.Find "[ID] = " & Str(Nz(Me![List9], 0))
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
Back to Index