Søge vha CboBox med tilknyttet knap

Har på formular oprettet ubundet cbobox med tilknyttet knap.

Ønsker at når jeg har valgt emne i cbobox skal der ved klik på cmdFindNaeste findes næste emne - HVIS der ellers er flere, ellers msgbox.

Cboboxen fungerer fint men jeg har problemer med at få knappen til at virke. Har flg. kode på mine 2 kontrolelementer:

____________________________________________
Private Sub cboFindHalSal_AfterUpdate()

' Find de poster der passer til de der er valgt i cboboxen.
    Dim rs As Object
    Set rs = Me.Recordset.Clone
    rs.FindFirst "[HalSalRef] = '" & Me![cboFindHalSal] & "'"
    Me!cboFindHalSal.Requery
    Me.Bookmark = rs.Bookmark
    rs.Close
End Sub

______________________________________
Private Sub cmdFindNaeste_Click()
   
    Dim rs As Object
    Set rs = Me.Recordset.Clone
   
    rs.FindNext "[HalSalRef] = '" & Me![cboFindHalSal] & "'"
        If rs.NoMatch Then
            MsgBox "Der er ikke flere indberetninger der passer til din forespørgsel", vbInformation, "Ingen data fundet! "
        Else
    Me!cboFindHalSal.Requery
    Me.Bookmark = rs.Bookmark
    End If
   
    rs.MoveNext

End Sub
___________________________________

Går stærkt ud fra at der på knappen skal indgå et loop. Har prøvet at dim både med DAO og ADOB men kan ikke få det til at virke (RunTime Error xxx) :(

Så ovenstående er mit bedste bud.....

Er der nogen der har en god ide??