Help Speeding up search using a combo box

[rookiedev]

I have a combo box that looks up an address and then displays the Customer information for the selected value. There are currently 1840 addresses and the process is getting slower all the time. Does anyone have any suggestions?

This is the row source of the combo:
SELECT DISTINCTROW [Customers].[CustomerID], [Customers].[Fac#] FROM [Customers];

And

this is the AfterUpdate Event:

Sub Combo40_AfterUpdate()
' Find the record that matches the control.
Me.RecordsetClone.FindFirst "[CustomerID] = " & Me![Combo40]
Me.Bookmark = Me.RecordsetClone.Bookmark
End Sub

Thanks
RookieDev

 

[mp9]

Might be worth investigating

DoCmd.FindRecord

rather than using a recordsetclone and bookmark.

http://www22.brinkster.com/accessory/

 

[rookiedev]

How would I accomplish that exactly?

Sub Combo40_AfterUpdate()
' Find the record that matches the control.
DoCmd.FindRecord"[CustomerID] = " & Me![Combo40]

End Sub
Would this work???????

RookieDev