Génération pdf access vba

Génération pdf access vba - VB/VBA/VBS - Programmation

Marsh Posté le 06-12-2011 à 14:40:36    

Bonjour,
 
Je suis en train de faire une macro qui me génère des pdf en fonction d'un etat existant et je souhaiterai avoir un pdf pour une page de mon état et non pas un pdf avec toutes les pages de mon état correspondante.
Pour cela j'utilise un recordset pour parcourir mes enregistrement mais je n'arrive pour le moment qu'à générer le nombre exacte de pdf correpondant a mon recordcount mais avec tout les contrôles. (2 enregistrement = 2 pdf de 2 page au lieu de 2 pdf de 1 page).
voilà le code que j'utilise (travail sous vba access 2007)
 
Set rst = db.OpenRecordset("SELECT * FROM DATAMART_TERR WHERE (CTRL_SERVICE = 'PhM' AND Controle_Conforme = '0') AND (CTRL_DATE BETWEEN #" & DebutPeriode & "# And #" & FinPeriode & "#)" )
    While Not rst.EOF
        semaine = DatePart("ww", Date, vbMonday, vbFirstFourDays) - 1
        indic = indic + 1
        strEtat = "ETAT_Enquete_terrain"
        gstrReportFilter = "([CTRL_SERVICE] = 'PhM' AND [Controle_Conforme] = '0') AND ([CTRL_DATE] BETWEEN #" & DebutPeriode & "# And #" & FinPeriode & "#)"
        DoCmd.OutputTo acOutputReport, strEtat, acFormatPDF, "U:\document\doc\PDF_\test_" & indic & "Terrain_PhM_" & semaine & ".pdf"
        rst.MoveNext
   Wend
 
merci par avance

Reply

Marsh Posté le 06-12-2011 à 14:40:36   

Reply

Marsh Posté le 06-12-2011 à 15:49:04    

Salut, sans les avoir regarder voir si http://warin.developpez.com/access/pdf/  
ainsi que http://cafeine.developpez.com/access/tutoriel/pdf/  ( a voir même si tu as 2007 )


Message édité par kiki29 le 06-12-2011 à 16:51:45

---------------
Myanmar 90/91 : http://gadaud.gerard.free.fr/publi [...] index.html
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed