Report for subform results ??

[Lukael]

Hi,



I have a "search" form, which by selecting criteria opens another form where results of criteria is displayed in subform. How can I create report, that will show this subform result ? Report icon is on form, not subform.

Basically, I just want to print what subform shows, nothing else.


Any help appreciated, thanks in advance !!

[pbaldy]

It might help to see the method used to filter the subform. You may be able to adapt it to open the report as well.

[Lukael]

Thanks for response, but can you be more specific ?

I'm searching all over and don't find anything that would suit my needs.

I tried this also, that should work, but It doesn't in my case:

DoCmd.OpenReport "MyReport", acViewPreview, , "PK_ID=" & Me!MySubform.Form.SubformControlName

[pbaldy]

I'm not sure how to be more specific about asking how you do the filtering for the form. How about "what is the code in your search form now"? Once we know that, we can see if it can be adapted for the report.

[Lukael]

Ok, I didn't understand "filtering" meaning. Here is my code:

Private Sub Results_Click()

Dim RecResults As String

If (Me.Chkbox1 = False And Me.Chkbox2 = False) Or (Me.Chkbox1 = True And Me.Chkbox2 = False) Then

RecResults = "SELECT * FROM MyTable WHERE Field1=False"

If Not IsNull(txtNumber) Then
RecResults = RecResults & " AND Field2 =[Forms]![FirstForm]![txtNumber]"
End If

If Not IsNull(txtName) Then
Recresults = RecResults & " AND ((Field3 ""*" & txtName & "*""))"
End If

If Not IsNull(txtSurname) Then
RecResults = RecResults & " AND ((Field4 ""*" & txtSurname & "*""))"
End If

'Open form for displaying results
DoCmd.OpenForm "SecondForm", acNormal
Forms![SecondForm]![SubformOnThisForm].Form.RecordSource = RecResults

End If

End Sub

This code is executed from cmdButton on first form - which is only a "search" form.

[pbaldy]

Ah, okay. Where do you want the button? Easiest would be on the search form, but elsewhere one method would be to use the subform, presuming it's open. In the open event of the report:


Me.RecordSource = Forms![SecondForm]![SubformOnThisForm].Form.RecordSource

[Lukael]

No, search form is only for entering the criteria which user wants to see on form2. Form2 is where I have and want everything - button and to open report.

[Lukael]

I tried, It works !!!! I must learn about thise reports a little bit more, didn't know that was so easy, It's just like working with forms. And I was struggling with whole bucnh of other things. Thanks a lot Paul for that !!

[pbaldy]

Have you tried the code?

[pbaldy]

Ah, sorry, posted too fast. Happy to help!