XL 2016 Conversion en PDF de plusieurs courrier suivant base de donnée

dindin

XLDnaute Occasionnel
Bonjour le Forum
j'ai une base d'environ 100 Contacts : nom prénom adresse ......
j'ai un courrier type dans un autre onglet

j'utilise ce code pour convertir le courrier en PDF
VB:
Private Sub pdf_Click()
' pdf Macro

Dim fName As String
With Worksheets("Autorisation")
    fName = .Range("A17").Value & " _ " & .Range("F10").Value
End With

'récuperer le chemein du dossier source
ChDir ThisWorkbook.Path


'enregistrer le pdf dans le même dossier que le fichier source
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
ThisWorkbook.Path & "\" & fName, Quality:= _
xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
OpenAfterPublish:=False
'afficher message à la fin d'enregistrement du PDF
MsgBox ("Le permis N° " & fName & " a été bien enregistré en PDF dans : " & ThisWorkbook.Path & vbLf & "Vous pouvez joindre ce fichier par mail.")
'enregistrer le classeur
ActiveWorkbook.Save

End Sub
L'objectif et de convertir ce courrier type en PDF (plusieurs pages bien sur ) suivant la liste des personnes de la base (parfois ça peut aller jusqu'à 100 personnes donc 100 pages) et l'enregistrer dans le même classeur ou se trouve le fichier excel.
je n'arrive pas à adapter ce bout de code car je suis novice en VBA
Merci pour votre aide
je joins le fichier
 

Pièces jointes

  • Pdf en masse.xlsm
    13 KB · Affichages: 19

GALOUGALOU

XLDnaute Accro
bonjour dindin bonjour le forum
question pour une précision
nativement la question était
L'objectif et de convertir ce courrier type en PDF (plusieurs pages bien sur ) suivant la liste des personnes de la base (parfois ça peut aller jusqu'à 100 personnes donc 100 pages) et l'enregistrer dans le même classeur ou se trouve le fichier excel.
le besoin est d'avoir dans le dossier 100 feuilles pdf ou un seul fichier pdf ?
cordialement
galougalou
 

dindin

XLDnaute Occasionnel
bonjour dindin bonjour le forum
question pour une précision
nativement la question était
L'objectif et de convertir ce courrier type en PDF (plusieurs pages bien sur ) suivant la liste des personnes de la base (parfois ça peut aller jusqu'à 100 personnes donc 100 pages) et l'enregistrer dans le même classeur ou se trouve le fichier excel.
le besoin est d'avoir dans le dossier 100 feuilles pdf ou un seul fichier pdf ?
cordialement
galougalou
le dossier est seul fichier pdf le nombre des pages égal au nombre des personnes de la base
Merci d'avance
 

Discussions similaires

Réponses
36
Affichages
1 K
Réponses
22
Affichages
1 K