I have a search form that has text boxes and a list box. Everything works great on my search form.
I have added the AddAllToList function to add all to the listbox. All is in the listbox but I am having trouble getting my form to show all records. I put the below code into my on click event of my button but it doesnt seem to work.
Private Sub Btn_Search_Click()
If Me.LstAnalystName = "(ALL)" Then
Me.Frm_Search2.Form.RecordSource = "SELECT * FROM qry_AllData "
' Update the record source
Me.Frm_Search2.Form.RecordSource = "SELECT * FROM qry_AllData " & BuildFilter
' Requery the subform
I did something similar to this on another form with a combo box and it works fine. However that form is not a search form. I am having trouble with it on my search form.
Any help is appreciated.