vba - Filter Subform, Starts With, Multiple criteria -
i filter subform based on data put text box. code below show record if student id typed perfectly. want have filter show records in student id, first name or last name starts me.sort.text
private sub sort_change() if isnull(me.sort.text) or me.sort.text = "" me.students_subform.form.filteron = false else me.students_subform.form.filteron = true me.students_subform.form.filter = "[student id] ='" & me.sort.text & "'" end if end sub
it sounds me need filter expression 3 like conditions or'd together.
for example if me.sort.text contains text "foo", build filter expression string such ...
"[student id] 'foo*' or [first name] 'foo*' or [last name] 'foo*'" i tested code in access 2010 , filters subform think want ...
private sub sort_change() dim strfilter string me.sort if len(.text & vbnullstring) > 0 strfilter = "[student id] '" & .text & _ "*' or [first name] '" & .text & _ "*' or [last name] '" & .text & "*'" end if end debug.print "strfilter: " & strfilter '<- inspect in immediate window ' ctrl+g take there me.students_subform.form if len(strfilter) = 0 .filteron = false else .filter = strfilter .filteron = true end if end end sub
Comments
Post a Comment