Publipostage - Créer un fichier PDF par document

Achille_du_60

XLDnaute Nouveau
Bonjour

Je suis trésorier d'une association et, chaque année, je dois établir un document cerfa pour les frais de déplacements sous forme de don.

J'ai réalisé le document cerfa au format word et constitué ma base de données des bénévoles sous la forme d'un tableau excel.

J'ai réalisé le publipostage en insérant les champs de fusion dans le document Word.

Quand je procède au publipostage, je me retrouve avec un seul fichier PDF contenant tous les enregistrements.

Je souhaiterai obtenir un fichier PDF par enregistrement nommé sur le nom de champ "NOM".

Je ne sais pas si c'est réalisable dans l'étape publipostage ou par une macro (VBA).

Quelqu'un peut-il m'aider ?

Merci
 

Pièces jointes

  • base.xlsx
    8.8 KB · Affichages: 43
  • Cerfa.docx
    12.8 KB · Affichages: 42

laurent3372

XLDnaute Impliqué
Supporter XLD
Voici une solution.
Les fichiers PDF sont créés dans le sous-répertoire "Archives publipostage" du répertoire courant.
La détermination du nom de fichier est codée "en dur". Il faudra la modifier si on modifie le modèle.
La macro se lance automatiquement à l'ouverture du modèle.
Il faut répondre "Oui" au dialogue qui s'affiche.
La macro ferme tout en fin d'exécution
 

Pièces jointes

  • Cerfa.docm
    23.6 KB · Affichages: 129

kiki29

XLDnaute Barbatruc
Dernière édition:

Achille_du_60

XLDnaute Nouveau
Voici une solution.
Les fichiers PDF sont créés dans le sous-répertoire "Archives publipostage" du répertoire courant.
La détermination du nom de fichier est codée "en dur". Il faudra la modifier si on modifie le modèle.
La macro se lance automatiquement à l'ouverture du modèle.
Il faut répondre "Oui" au dialogue qui s'affiche.
La macro ferme tout en fin d'exécution

Bonjour Laurent

Merci beaucoup de ta réponse

Je rencontre le problème suivant :
- à l'ouverture du fichier docm, je répond oui au dialogue et indique le chemin de la base de données xlsx
- le répertoire "Archives publipostage" se créé bien
- un fichier "Lettres types1 - Word" et un fichier "Document1 - Word" s'ouvre avec les données de la 1ère ligne de la base de données.
- puis s'affiche une fenêtre de débogage.

Peux-tu m'aider ?

Merci à toi

1580974602362.png
 

Achille_du_60

XLDnaute Nouveau
Quel est le message d'erreur qui s'affiche avant que s'ouvre la fenêtre de débogage ?
As-tu modifié la lettre-type dans le fichier .docm ?

Curieusement, je n'ai plus le message d'erreur !!!

La macro semble se dérouler normalement, je me retrouve au final avec le programme Word ouvert mais le fichier Cerfa.docm est fermé.
Mais, je n'ai aucun fichier pdf créé dans "Archives publipostage".
 

Achille_du_60

XLDnaute Nouveau
Le sous-répertoire "Archives publipostage" est-il créé dans le répertoire courant ?

Bonjour Laurent

Oui le sous-répertoire est bien créé.
la création des pdf fonctionne si je mets le chemin entier en dur dans "nomDir"

J'ai donc voulu mettre en application sur mon fichier réel.

J'ai fait un copier-coller de la macro.

Plusieurs problèmes :
- la macro ne se lance pas automatiquement à l'ouverture du fichier
- lorsque je la lance, j'ai une erreur d'exécution 5852

débogage
.Destination = wdSendToNewDocument

Casse-tête ce truc !
 

Achille_du_60

XLDnaute Nouveau
Bonsoir,
Est-ce que ça fonctionne, maintenant ?

Bonjour Laurent

En premier lieu, merci d'avoir répondu !

Si j'ai tardé à te répondre, c'est que j'ai eu à gérer des difficultés assez stressantes en lien avec l'actualité, je ne m'étendrai pas sur le sujet.

J'ai repris ta dernière macro et l'ai adapté à mon document de travail.

1er point, la macro ne se lance pas automatiquement, j'ai toujours cette boite de dialogue à l'ouverture.

1584791132048.png


Je réponds oui, le document s'ouvre.

Je lance ensuite la macro manuellement.

Elle bloque avec ce code

1584791189493.png


Voici la fenêtre de débogage.

1584791239483.png


A noter, le répertoire "Archives publipostage" ne se créé pas.

Je l'ai créé manuellement, j'ai toujours le même problème.

Peux-tu faire quelque chose ?

En attendant, prends soin de toi et de tes proches.
 
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
314 611
Messages
2 111 146
Membres
111 051
dernier inscrit
MANUREVALAND