I have a lookup combo box in a main form with the following VBA AfterUpdate:
'Clone the form's table/query into a recordset.
Dim MyRecSet As Object
Set MyRecSet = Me.Recordset.Clone
'Find first matching record in the recordset.
MyRecSet.FindFirst "[CasePlanID] = " &...
