Oops, I missed that last post of yours. . .
Once you've made your Report, change that Record Source from the Query to the name of your Table.
Then you can basically just cut and paste the VBA code from my example into your button's On Click Event.
Code:
' Just in case we run into an error
On Error GoTo Error_Command12_Click
' Make sure the user selects a state
If IsNull(Me!Combo8) Then
MsgBox "Please select a state first."
GoTo FunctionClosing
End If
' Open the Report
' Report Name: Report1
' View Type: acViewPreview (Show me on the screen instead of printing it)
' Filter: None (WHERE clause used instead)
' Where Clause: [ID]= the selected state's ID number
DoCmd.OpenReport "Report1", acViewPreview, , "[ID]=" & Me!Combo8
' Exit the function!
GoTo FunctionClosing
FunctionClosing:
Exit Sub
Error_Command12_Click:
' If we run into an error, alert the user.
MsgBox "The following error occurred while trying to view the Report:" & _
vbCrLf & vbCrLf & Err.Description
' Exit the function!
Resume FunctionClosing