Unbound Search Box

[jlgray0127]

I have a form and set up a search box. The box works perfectly.

However, I have button control I use to clear any filtering the users perform. When they click the button, the it works and clears all any filtering they did with either the search box or built in Access filtering.

However, once they click the Clear Filter button, the search box stops working unless you filter with the access controls and then use the text box, or close the form and reopen it.

Code for the unbound text box and search button:

Private Sub Command77_Click()
Me.Filter = "[Component] Like '*" & [Search] & "*'"

End Sub

Code for Clear Filter button, I've tried two different methods. The search box does not work after, using either method.

1.
Private Sub Command66_Click()


Me.Filter = ""
Me.FilterOn = False


End Sub

2.
Private Sub Command66_Click()
Me.FilterOn = False


End Sub

[pbaldy]

I would expect

Me.FilterOn = True

in the ambiguously-named Command77 code (after the existing code). Does that fix it?

[jlgray0127]

Doing my best Homer Simpson "Dope!"

Thank you!!!

[pbaldy]

LOL! Happy to help.

[Welshgasman]

Doing my best Homer Simpson "Dope!"

Thank you!!!

I thought it was Doh!