Bonjour à tous,
Je suis nouveau sur ce forum et j'ai parcouru pas mal de sujet sur le site traitant en parti de mon problème mais tous mes essais sont KO quand je veux adapté ce qui est proposé...
je vous explique mon besoin :
J'ai créé un Etat pour lequel je lis les données d'un Form (Fiche Pays) pour lequel j'imprime en Pdf la fiche de synthèse avec une règle de nommage (je définis où je veux le stocker, comment il doit s'appeler ("Fiche_"+Pays)
Tout çà fonctionne très bien au cas par cas, depuis le Form, je clique sur un bouton et çà me génère le Pdf et il s'enregistre tout seul là où je veux.
Mon souci c'est que je n'arrive pas à faire une boucle pour qu'à partir d'un bouton je puisse lancer l'édition de toutes les fiches de la table, et non plus depuis un Form unique, pour lesquelles un champs contient une valeur genre "imprime / imprime pas" la fiche...
Est ce que quelqu'un pourrait m'aider svp ?
voici le code pour la partie Edition de la fiche depuis le form :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16 Private Sub Button_Editer_pdf_Click() 'Enregistre les modifs qu'il pourrait y avoir avant de générer la fiche Refresh DoCmd.Save acForm, "Fiche Pays" ' Permet d'ouvrir l'état de la fiche Pays en cours pour édition en Pdf DoCmd.OpenReport "Fiche Pays", acViewReport, , , acWindowNormal '------------------------------------- 'CheminPDF = définit où sont stockés les fiches PDF en local pour être rapide à la génération CheminPDF = "C:\Users\Public\Documents" 'NomPDF = définit le nommage du fichier PDF qu'on génére FICHE_ + le pays et l'extention .pdf NomPDF = "FICHE_" & Pays & ".pdf" '------------------------------------- 'Ouvre l'Etat et génère la Fiche pdf et referme l'état, le fichier est enregistré directement dans le répertoire CheminPDF DoCmd.OutputTo acOutputReport, , "PDF", CheminPDF & NomPDF, False, "", , acExportQualityPrint DoCmd.Close acReport, "Fiche Pays" '-------------------------------------
Partager