Filter not working

H

hughess7

Hi all

I am trying to filter a subform using a combo box on the parent form where
the user selects the field to search and an unbound text box for the search
criteria. It now runs without error but it does not return any results so
something is wrong somewhere... I've debugged and the txtCriteria is passed
the correct data but the filter is false? I know the data exists though...

Dim txtSearch As String
Dim frm As Form, strFilter As String

Set frm = Me.frmClaims.Form

txtSearch = Me![txtCriteria]

strFilter = "[" & Me![cboField] & "]" = """ & txtSearch & """""
frm.Filter = strFilter
frm.FilterOn = True

Part 2 of the question will be to make sure I have the correct data type
selected for the sql string. I have the data type of the field stored in
column(1) of the combo box as text eg date/time, text, long integer etc.

Any ideas?

Thanks in advance for any help.
Sue
 

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

Filter subform from combo unbound text box 3
Working with Filters 0
Form goes MIA! 3
How to test if RecordSource filtered out everything 7
What's causing Illegal function call?? 4
Trying to filter a form by VBA 1
DoCmd.GoToControl "[MODEL]" 1
Record Search within a Form 3

Top