Remember this time I need the button to jump to the record when the user clicks it and not on combo box. I copy and pasted the code by replacing '
rs.FindFirst "[Agent ID] = " & Str(Nz(Me![button], 0))
with
rs.FindFirst "[Agent ID] = " & Str(Nz(Me![ParentCompany], 0))
doesnt work. I am sure thats something wrong with one part of the control but coming from C# to this is horrible.
' Find the record that matches the control.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[Agent ID] = " & Str(Nz(Me![ParentCompany], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark