Synchronizing two combo boxes

[Erik Gjertsen]

I wish to synchronizing two combo boxes.

I have try the following solution:

I have made 2 Combo boxes. The first combo boxes name is cbofirst
In the properties Rowe Source Type: Value List
Row Source: ;A;B;C;D;F

Private Sub cboFirst_AfterUpdate()
cboFind.Requery
cboFind.SetFocus
End Sub

The second Combo Boxes name is cboFind.
In the Properties:Rowe Source Table/Query
Row Sourse:QrySecond

Private subFind_AfterUpdate()
Me.RecordsetClone.FindFirst " CategoryID = """ & Me!cboFind & """"
Me.Bookmark = Me.RecordsetClone.Bookmark
End Sub

I have made a Query by name QrySecond.
CategoryID and CategoryName
Criteria in CategoryID: Like[Forms]![FormName]![cboFirst] & "*"

But it still not work. No error comes up.
Can some one help me.

Thanks
Erik Gjertsen