View Single Post
  #1  
Old April 2nd, 2010, 09:29 PM posted to microsoft.public.access.forms
Chuck W[_2_]
external usenet poster
 
Posts: 98
Default Combo Box to look up autonumber field in a form

I have a form called frmFallVariancePastEntries that has field called FallID.
This is an autonumber field which is visible but not updatable. I have
thousands of records available and want to create a lookup combo box. I
created one called cblFindFallID. It is based on a query which lists all
FallIDs. I want to be able to go directly to the specific record based on the
Fall ID but am getting an error which says “Run Time Error 3464 Data Type
Mismatch in Criteria Expression”. Below is the vba code for this object. I
am doing the same thing in another database that I use but the field in that
database is not an autonumber field. Can someone help me modify this code to
look up this automnumber field?

Private Sub cboFindFallID_AfterUpdate()
Dim rst As Object
Set rst = Me.Recordset.Clone
rst.FindFirst "FallID = """ & cboFindFallID & """"
Me.Bookmark = rst.Bookmark
End Sub