Hallo allemaal,

Ik probeer een access-rapport (automatisch) op te slaan als PDF.

Het is echter een gefilterd rapport.

Bij het invoeren van volgende script;  krijg ik alle records in mijn PDF en niet enkel diegene die ik wil filteren.


Private Sub Knop70_Click()

Dim strWhere As String
Dim folder As String

folder = "F:\Facturen Klanten\2013\"

DoCmd.OpenReport "rpt A Invoice", acViewPreview, "", strWhere, acHidden

DoCmd.OutputTo acOutputReport, "rpt A Invoice", acFormatPDF, folder & [nr] & ".pdf"


End Sub
 
Het commando OpenReport geeft mij wel het gefilterde rapport, maar het commando output to geeft mij alle records. In dit laatste wil ik ook enkel het gefilterde rapport/record hebben.
 
Wie kan mij helpen ?

Is er dan een manier om dit voor elkaar te krijgen ?

Dankjewel,
Hilde

Wat zijn de namen van de velden in je tabel (of query) en op welk(e) veld(en) wil je filteren?

Je hebt een formulier openstaan met de factuurnummer? Op het moment dat je wilt afdrukken?

Wat is de naam van het formulier en de naam van het veld op dit formulier waar factuurnummer op staat?
Naam van het formulier zie je allicht in de titelbalk van het formulier in ontwerweergave.
Naam Van het veld ..daarvoor selecteer je het veld (waar factuurnummer in staat) en dat via het venster 'Eigenschappen' tabblad 'Alle' helemaal bovenaan 'Naam'

Als je dat weet kan je een waarde toekennen aan strWhere

strWhere = "Factuurnummer=" & me.NaamVanHetVeldWaarFactuurnummerInStaat

(werkt allicht zoniet doe...)
strWhere = "Factuurnummer=" & Forms!Formuliernaam.NaamVanHetVeldWaarFactuurnummerInStaat

Hopelijk helpt dit je verder. Zo niet dan zou het handiger zijn als je een leeggemaakt kopietje van je database hier eens zou zetten.