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

[dindin]

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

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

 

[laurent3372]

Bonjour,

Pourquoi ne pas utiliser la fonction Publipostage de Word qui est faite pour ça ?

Cordialement,
--
LR

 

[dindin]

Bonjour,

Pourquoi ne pas utiliser la fonction Publipostage de Word qui est faite pour ça ?

Cordialement,
--
LR

Bonjour Laurent

justement j'ai voulu éviter plsiurs manip et faire le tout depuis excel via un seul bouton

 

[laurent3372]

On peut automatiser Word depuis Excel

 

[dindin]

Pouvez vous expliquer un peu plus

 

[laurent3372]

On peut:

• soit écrire une macro Word qui fait tout (c'est le plus simple)
• soir écrire une macro Excel qui fait faire le boulot par Word

 

[laurent3372]

J'oubliais de dire: on peut lancer l'exécution de la macro Word depuis une macro Excel.

 

[dindin]

Désolé Laurent je ne sais pas le faire surtout entre excel et word
je suis vraiment novice en vba
j'apprend tout les jours mais parfois c'est dur

 

[laurent3372]

Oui mais en VBA sous Excel, c'est compliqué à faire pour ne générer qu'un seul fichier PDF.
C'est pour ça que je suggère d'utiliser Word.
Je peux te fournir un exemple opérationnel.

 

[dindin]

Oui mais en VBA sous Excel, c'est compliqué à faire pour ne générer qu'un seul fichier PDF.
C'est pour ça que je suggère d'utiliser Word.
Je peux te fournir un exemple opérationnel.

Oui si tu peux
Merci d'avance

 

[GALOUGALOU]

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]

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

 

[GALOUGALOU]

si vous envoyer par mail il vaudrait mieux avoir plusieurs fichier pdf dans un même dossier ? si oui je pense savoir faire.
@+

 

[dindin]

Ok j'opte pour cette solution
Merci

 

[GALOUGALOU]

bonjour le forum
dans le dossier source la macro enregistre en pdf autant de fiche que de clients.
la suite des explications dans un post a venir
@+