gegevens van doorlopend formulier naar report overzetten

[antonv]

hallo forumleden,

hier een vraag over het ontwerp van report waarop ik vastloop. Mijn doorlopende formulier toont de artikelen die voldoen aan de selektiecriteria in de kop van het formulier.

huidige situatie
een doorlopend formulier gebaseerd op de tabel tblartikel [nr;omschrijving;groep;prijs]

Stap1, kies de artikelgroep en toon de selectie in het formulier

werking: In de kop van het formulier is een combobox met een lijst van groepen,
met de code:
Private Sub cboGroep_AfterUpdate()
Dim strSQL As String
strSQL = "Select * FROM tblArtikel WHERE [groep]= """ & Me.cbogroep & """"

If Not IsNull(strSQL) Then
Me.RecordSource = strSQL
End If
​

Stap2, vul een zoekargument in dat een gedeelte van de omschrijving bevat.

werking: In de kop van het formulier is een textbox ([txtzoek]; unbound) en vul deze met zoekargument,
met de code:
Private Const strSQL1 = "Select * FROM tblArtikel WHERE [groep] = '"
Private Const strSQL2 = " AND [Omschrijving] like '"
Private Const strSQL5 = " ORDER BY [nr] ASC"

Private Sub txtZoek_AfterUpdate()
Dim strSQL As String
Dim rs As Object

strSQL = strSQL1 & Me!cboGroep.Value
strSQL = strSQL & "'" & strSQL2
strSQL = strSQL & "*" & Me.txtZoek & "*"
strSQL = strSQL & "'" & strSQL5
If Not IsNull(strSQL) Then
Me.RecordSource = strSQL
End If
End Sub
​

Tot zover werkt alles perfekt en krijg ik een lijst van alle geselekteerde artikelen in het formulier

Wens
een report dat deze gegevens kans afdrukken. Wie kan mij helpen met een paar tips hoe dit aan te pakken.

alvast bedankt voor de inspanningen
Anton

UPDATE
Zelf gevonden. Oplossing staat beschreven op volgende link:

http://www.fontstuff.com/access/acctut19.htm
'**********