M
MentalDrow
Hi all,
I have tried using the other posts dealing with what seems like similar
issues to what I am having but I don't seem to be getting any results.
Here's what I have.
I have a parent form with a subform within a subform on it. Thanks to all
the help I found here, I found out there was a wizard for creating a combo
box that would pull up all the names in the appropriate columns so the users
could do a search with that combo box. The problem I am running into is that
the combo box is sorting the list according to the Primary Key (Autonumber)
rather than the DriverLast (Column 1)as I would like it to. Any help is
awesome. The code is below:
Private Sub DriverLookUp_AfterUpdate()
' Find the record that matches the control.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[Primary] = " & Str(Nz(Me![DriverLookUp], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
Thanks,
Chaz
I have tried using the other posts dealing with what seems like similar
issues to what I am having but I don't seem to be getting any results.
Here's what I have.
I have a parent form with a subform within a subform on it. Thanks to all
the help I found here, I found out there was a wizard for creating a combo
box that would pull up all the names in the appropriate columns so the users
could do a search with that combo box. The problem I am running into is that
the combo box is sorting the list according to the Primary Key (Autonumber)
rather than the DriverLast (Column 1)as I would like it to. Any help is
awesome. The code is below:
Private Sub DriverLookUp_AfterUpdate()
' Find the record that matches the control.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[Primary] = " & Str(Nz(Me![DriverLookUp], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
Thanks,
Chaz