Combo box and filter query

[thart21]

This is driving me crazy, I've done it many times before but no code I use seems to be working for this project.

I have a Select query and a form with a simple combo box and command button on it. I want users to be able to select the Season they want to run, click the button and have the query run filtering it on the combo box selection.

What am I missing here? I can now get the query to run but it won't filter the results.


Private Sub cmdSeason_Click()


Dim strSQL As String
Dim strWhere As String
Dim stDocName As String
strWhere = "WHERE"
stDocName = "qSourceData_AllSeasons"

strWhere = strWhere & "[SELL SEASON] = '" & Me.cboSeason.Value & "'"
strSQL = "SELECT * " & "stDocName"
strSQL = "strWhere & strSQL"
DoCmd.OpenQuery stDocName, , , strSQL
Debug.Print
End Sub

Would appreciate any help. Haven't been able to find any threads addressing this which I find unusual so perhaps I'm searching for the wrong keywords: combo box, filter query, strWhere, strSQL, etc.

Thanks

[pbaldy]

I'm surprised you're not getting an error; OpenQuery has no such argument. OpenForm and OpenReport do:

BaldyWeb wherecondition

By the way, even if it were valid, there are numerous other mistakes.

[ConneXionLost]

Place this:

[Forms]![Your form name here]![cboSeason]

in the select query as criteria for the field you want to filter.

Simplify the code for your button so it only opens the query.

Cheers,

[thart21]

Thanks for the tips, was making it more complicated than it is.

[thart21]

Just tried this and am getting no data when selecting a season from my combo box.
I have the rowsource of the combo box set to tblSeasons.
Do I need to manipulate the VBA code behind the cmd button for it to read my combo box selection? I've checked my criteria and have Form!frmName!cboSeason in there correctly.

Thanks

[pbaldy]

What is your code now? What is the bound column of the combo, and is it the value expected by the query?

[thart21]

Bingo! Can't believe I've been out of the Access world for less than 2 years and feel like I'm starting all over again! I had the bound column set incorrectly, it is now working perfectly.

Thank you!

[pbaldy]

No problemo, glad we got it sorted out.