I am using a form in a spreadsheet to select customers. I can use my mouse
and select the customer. I would like to type in the box to select the
customer by name instead. I have seen it work in other applications. I just
cannot figure out how to make it work.

Private Sub cboCustomerID_Change()
If Not IsNull(Me.cboCustomerID) Then
LoadStoreList
LoadSOForCustomer Me.cboCustomerID
End If
Me.cboStoreID.SetFocus
End Sub

Private Sub cboStoreID_Change()
If Not IsNull(Me.cboStoreID) Then
LoadSOForStore Me.cboStoreID
Else
If Not IsNull(Me.cboCustomerID) Then
LoadSOForCustomer Me.cboCustomerID
End If
End If
Me.lstShippingOrders.SetFocus
End Sub

When I have selected the customer with the mouse or start typing I loose
focus, because of the Me.cboStoreID.SetFocus after the End If.

This was written by some one else and I am trying to modify it to make it
more user friendly.

Thanks for the help.

--
Thanks
Mark C.