Hi Expert,

I would like to use a combo box to find a record in a form. I met the error message of data type is mismatch. The field acct_no is in type of number -long integer so I use CLng() to convert text of combo box. Can you give me a help?

Me.RecordsetClone.FindFirst "[acct_no] = '" & CLng(Me.cbo_find.Value) & "'"
If Me.RecordsetClone.nomatch Then
    MsgBox Me.cbo_find & " Not Found"
Else
    Me.Bookmark = Me.RecordsetClone.Bookmark
End If

FYI. If I fix the account no and put Me.RecordsetClone.FindFirst "[acct_no] = 123456" then I can locate the record in form.

Thanks and Best Regards,
martinaccess :D:D:D

Me.RecordsetClone.FindFirst "[acct_no] = " & Me![cbo_find]
Me.Bookmark = Me.RecordsetClone.Bookmark
cbo_find = Null

The above works for me with no conversion of the number (integer in my case)

Hope this helps.


Clive Astley

Clive,

Thanks. Your code really works! But I find combo box has not stored any value but I want it to be. Would you know if the control source is blank, how can combo box display the selected option after running your codes?

Please help.

Thanks and Best Regards,
martinaccess :D:D:D