Combo Search

[geraldk]

Hello,



I am looking for code that will allow me to search something in a combo box and then go to a record. At the moment I this being done in a marco, which I am not a fan of. I prefer vba code myself, more control.

Here is that I have in the macro:

="[EmpID] = " & Str(Nz([Screen].[ActiveControl],0))

I do have some code that used to work with Access 2003 but some reason it does like Access 2007/2010

Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[EmpID] = " & Str(Me![cboSearchName])
Me.Bookmark = rs.Bookmark

Any Help would be appreciated.

Thank you.

[jzwp11]

The code structure is still valid.

You can convert your macro to code by opening the form in design view and selecting the option to convert (right hand side of the ribbon).

Are getting any errors or is it just not working?

What is the data type of the EmpID field in the form's underlying record source? What is the bound field of the combo box?