Use a combo Box to pull up a record.

[IshBuild]

Hi all,

Hoping someone might be able to help.

I'm trying to use VBA to pull up a record by selecting it via a combo box.

I know you can do it with Macros but I need to add extra VBA commands and Macros don't have the versatility in my eyes. I've tried using this code below but I'm not having much luck.

Private Sub Cbo_SelectExistingCategory_AfterUpdate()


 ' Find the record that matches the control.
    Dim rs As Object


    Set rs = Me.RecordsetClone
    rs.FindFirst "[Category_ID] = " & Str(Nz(Me![Cbo_SelectExistingCategory], 0))
    


End Sub

Thanks in advance!

[aytee111]

This is the code:
Me.Filter="Category_ID=" & Me!Cbo_SelectExistingCategory
Me.FilterOn=True
Me.Requery