Filter subform using combobox

Posted by TT1611 on Stack Overflow See other posts from Stack Overflow or by TT1611
Published on 2009-06-24T16:04:49Z Indexed on 2010/04/02 4:03 UTC
Read the original article Hit count: 355

Filed under:
|
|

This has taken me nearly 2 weeks and I dont know what else to do. I have a main form (UserSearch) that has a subform (TestUserSub). The associated table for both forms is tblusers. very simple; on the main form (UserSearch) I have a comboboxes associated with the fields in the tblusers eg cmbid, cmbname, cmbdept and so on. All I want, is for a user to make a selection from any of these comboboxes and for the associated fields to display in the subform (TestUserSub). I have tried several different versions of code in the afterupdate event in a couple of the comboboxes and nothing is happening in the subform or in other instances I get error message. One example i have tried is filtering running an SQL command

Private Sub cmbid_AfterUpdate()

Dim strSQL As String

If IsNull(Me.cmbaccess) Then

Me.RecordSource = "tblusers" Else strSQL = "SELECT tblUsers.[Team Member_ID] FROM tblUsers " & _ "WHERE (((tblUsers.[Team Member_ID])= " & [form_testusersub].[txtid2]))& ";"
Me.RecordSource = strSQL End If

End Sub

The above didnt work..Can someone please help me with this. I have a sample database that i have been working off and by some very strange way, they have managed to do this same thing without calling any code. Is this possible?

© Stack Overflow or respective owner

Related posts about filter

Related posts about combobox