Printanje rezultata pretrage

U bazi koristim formu za pretraživanje i molim savjet kako printati rezultat pretrage.

Pogledaj ovde:
http://www.elitesecurity.org/t308239-Vise-rekorda-izvjestaj
Imaš primer i dodatni code koji je dao kolega graovacb.

Potpis

https://mzahorjanski.wixsite.com/mzahorjanski
https://www.fiverr.com/miroljubzahorja?up_rollout=true
https://www.youtube.com/@miroljubzahorjanski

Gledao sam to ali nije mi baš pomoglo.
Rezultati pretrage u mom primjeru su u subformi i ja pretražujem po više kriterija
napr naziv i kvalitet
ili naziv i skladište itd

Posto su forma i izvestaj u principu ista stvar i kod mora biti slican. Napravi Izvestaj na osnovu tabele MAT sa svim poljima i na formu postavi "dugme" cmdOtvoriIzvestaj:

Private Sub cmdOtvoriIzvestaj_Click()
Dim MySQL As String, MyCriteria As String, MyRecordSource As String
Dim ArgCount As Integer
Dim Tmp As Variant
ArgCount = 0


AddToWhere [Look For Skl], "[Skl]", MyCriteria, ArgCount
AddToWhere [Look For Naz], "[NazivT]", MyCriteria, ArgCount
AddToWhere [Look For Sifra], "[Sifra]", MyCriteria, ArgCount
AddToWhere [Look For Kvalitet], "[Kvalitet]", MyCriteria, ArgCount

If MyCriteria = "" Then
MyCriteria = "True"
End If
DoCmd.OpenReport "rptMaterijal", acViewPreview, , MyCriteria, acWindowNormal
End Sub

Napravio sam to tako, ali u reportu mi se ipak izlistaju svi podaci, a ne oni koji su rezultat pretrage,

Nisi bas sve postavio, u delu koda za stampanje izvestaja ti nedostaje deo MyCriteria, acWindowNormal
DoCmd.OpenReport "rptMaterijal", acViewPreview, , MyCriteria, acWindowNormal

Sada je u redu.

Hvala na pomoći

Evo sada sam to sve dotjerao pa šaljem formu za pretragu i ako se nekome sviđa neka je koristi.

Da li postoji mogucnost kada zavrsim pretragu sa sifrom 1124559 da ukucam novu sifru i rezultat nove pretrage se doda u subform pored postojecih rezultata za sifru 1124559