filter form by listbox selection

D

deb

Access 2003

form called fGua has an unbound list box called lstComponent.

When the user selects from the listbox how can I make the form filter by
that selection

Private Sub lstComponent_AfterUpdate()
Select Case lstComponent.Value
Case "CT" 'CT
Me.Filter = "[Component] = [lstComponent].value "
Me.FilterOn = True
Me.Component.DefaultValue = """" & Me.lstComponent.Value & """"
Case "ST" 'ST
Me.Filter = "[Component] = [lstComponent].value "
Me.FilterOn = True
Me.Component.DefaultValue = """" & Me.lstComponent.Value & """"
End Select
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Filtering a form with a combo box using left function 4
Error 2101 3
select case two conditions 1
Me.filter between 2 dates 2
Filter from Main Form to SubForm 5
Filter tabular form by combo box 0
Multiple Filters 19
Apply a new filter to open form 3

Top