Filter records from combo box selection 1

[jw5107]

I have a combo box on a form that has a value list like:
757
767
747

Once the user selects - say 757 from the combo box, I would like see all records pertaining to the 757 fleet on the form. The form is bound back to a table.

Any code ideas???

Thanks in advance!!
jw5107

 

[jksmi]

since the form is bound to a table you could use something like this:

Private Sub Combo30_AfterUpdate()
Filter = "[YOUR FIELD_NAME_HERE] = " & Combo30
FilterOn = True
End Sub

but if you want to remove the filter you'd need another button that just says FilterOn = False

Hope this helps, Jamie

 

[MakeItSo]

Put this in the AfterUpdate (à gusto the Change) event of the combo:

Me.Filter="field=" Me!ComboBox
Me.FilterOn=True

You could extend it by:

If len(Me!ComboBox)>0 Then
Me.Filter="field=" Me!ComboBox
Me.FilterOn=True
Else
Me.FilterOn=False
Endif

in order to reset your form to "no filter".

Cheers,
Andy



[blue]The last voice we will hear before the world explodes will be that of an expert saying:
"This is technically impossible!" - Sir Peter Ustinov[/blue]
andreas.galambos@bowneglobal.de
HP:

http://andygalambos.de

 

[MakeItSo]

You're a fast one Jamie! ;-)

 

[jw5107]

MakeitSo,

I am trying to use your example...

I keep getting an error message - Expected end statement, and this is highlighted in red:
Me.Filter = "FLEET=" Me!FleetSelect

Any fixes?

Thanks for your help.
jw5107

 

[jksmi]

Hi, you need to add an & like this...
Me.Filter = "FLEET=" & Me!FleetSelect

 

[jw5107]

jksmi,

I tried that and I keep getting a message that tells:
"You cancelled previous operation" and it highlights:
Me.Filter = "FLEET=" & Me!FleetSelect on debug.

Any other fixes...

Thanks!!
jw5107

 

[PHV]

Try something like this:
Me.Filter = "FLEET=[highlight]'[/highlight]" & Me!FleetSelect [highlight]& "'"[/highlight]

Hope This Help, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884

 

[jksmi]

Hi, PH is quite right, I assumed it was a number field, if its a text field then you need to surround the combobox value with 's as per PH else it causes a datatype confict

 

[jw5107]

PHV,

I have tried your changes.
When a value is selected from the combobox, the form goes completely null. The filter is on, but the form is null unitl I click the filter off.

Any fixes??

thanks for the help!!
jw5107