at the moment i enter a reference in a combo box and the code then returns in datasheet view the first record it finds for that refernence in the record set

Private Sub Combo68_AfterUpdate()
' Find the record that matches the control.
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[EXTERNAL_REF] = '" & Me![Combo68] & "'"
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub

What i want to do is find all the records that match that reference does anyone know how to do this?

Is there a simple rs. function that can do this for me that i simply do not know about?

Many Thanks

Dan Stead