Reports and Forms

[GaryG73]

I am working with MS Access 2010.
I have created an unbound form that when clicked opens a query with a combo box drop-down menu. When an item is selected from the menu, the query retrieves the records that match the menu selection.
I am now trying to create a report that connects to the form and query. I created a macro that opens the form however it continues on to the query without waiting for the combo box selection. Since the combo box is blank, the report comes back with headers but no data. How can I fix this? Thank you.

[alansidman]

Post your code to run the report. You will need to add a line of code to request input on the parameter for the query. Need to see what you have in order to determine what is not working.

[GaryG73]

I think this is what you requested. The first Macro opens the form. The second opens the query and resets it to a "blank" after the query has been run. Thanks for your help.

Option Compare Database

'------------------------------------------------------------
' DegreeReport
'
'------------------------------------------------------------
Function DegreeReport()
On Error GoTo DegreeReport_Err

DoCmd.OpenForm "SPC AS Degree Programs", acNormal, "", "", , acNormal


DegreeReport_Exit:
Exit Function

DegreeReport_Err:
MsgBox Error$
Resume DegreeReport_Exit

End Function


Option Compare Database

Private Sub Combo0_Change()
DoCmd.OpenQuery "Approvals by SPC AS Degree Program"
Me.Combo0 = " "
End Sub

Private Sub SPC_Degree_Programs_Change()

End Sub

[alansidman]

Ok. Those look ok. Where is your code to open and run the report?

Also in the query, what does the SQL statement look like? Does it have a reference to the Form for the criteria from the combo box? I'm guessing that it does.

I'm thinking that you need a line of code that says something like this:

If me.combo0="" Then
MsgBox ("Make a Selection")
Else
DoCmd......