rapport afdrukken van datagegevensblad

[mdegeest]

Ik heb een formulier met de layout van een datagegevensblad. (stock)
Dit is een overzicht van de gehele stock.
Op dit formulier heb ik ook een knop om een rapport af te drukken.
Als ik hier op klik wordt dus ook de gehele stock in dit rapport afgedrukt.
Op mijn formulier kan ik in dit datagegevensblad een filter toepassen op bv. alle artikelen met code 001.
Dan wordt in mijn formulier enkel artikelen getoond met deze code.
Hoe kan ik deze filter ook toepassen op mijn rapport ?
Dus, dat er geprint wordt wat er op die moment op het scherm wordt getoond.

 

[OctaFish]

Je zult de code van de knop moeten aanpassen, want een formulierfilter heeft in beginsel niks te maken met een rapportfilter; dat heeft namelijk zijn eigen filter. Je moet dus in de VBA code een regel opnemen. Iets als:

    DoCmd.OpenReport "test", , , Me.Filter

 

[mdegeest]

Ik heb de code achter de knop gestoken maar hij blijft alle records afdrukken.

Ik werk wel met een formulier en een subformulier.
De knop om te printen staat op mijn formulier.
Het subformulier is een gegevensblad weergave.
Het is in dit subformulier dat ik records filter en dus ook de gefilterde records wens te printen.

 

[OctaFish]

Dan zul je moeten verwijzen naar het subformulier, en niet naar het hoofdformulier.

 

[mdegeest]

Misschien stomme vraag maar kan je mij zeggen hoe ik dit juist doe ?
Hoofdformulier is "stock", subformulier is "subform stock".

 

[OctaFish]

Zoiets:

    DoCmd.OpenReport stDocName, acPreview, , Me.InboekenFiltering.Form.Filter

Ik raad je aan om de spaties uit de naam van het subformulier te verwijderen; die maken de code nodeloos ingewikkeld.

 

[mdegeest]

Yes !!!!!
Nu werkt het.
Hartelijk bedankt voor Uw hulp, had al uren op internet gezocht om de oplossing te vind.
:d