Publipostage conditionnel maison en pdf Individuel

Bonjour,

J’utilise le publipostage conditionnel maison trouvé sur faqword.com :

http://faqword.com/index.php/word/publipostage/416-publipostage-conditionnel-maison

Il me faut en sortie de ce publipostage des pdf inviduel .
Si j’ai déjà utilisé la macro suivante à partir d‘un seul fichier Excel

Sub publipostage()
Dim fusion As MailMerge
Dim x As Integer, nb As Integer
Dim chemin As String, nom As String
Set fusion = ActiveDocument.MailMerge
chemin = "D:\Mes documents\" 'mettre ici le chemin complet du dossier où stocker les fichiers sans oublier le \ à la fin
nb = fusion.DataSource.RecordCount
For x = 0 To nb - 1
With fusion
.DataSource.FirstRecord = x + 1
.DataSource.LastRecord = x + 1
.Destination = wdSendToNewDocument
.DataSource.ActiveRecord = x + 1
nom = .DataSource.DataFields("Nom") 'Remplacer Nom" par le champ à utiliser
.Execute
End With
ActiveDocument.ExportAsFixedFormat OutputFileName:=chemin & nom & ".pdf", ExportFormat:=wdExportFormatPDF, openafterexport:=False
ActiveDocument.Close savechanges:=False

Next
End Sub

Je ne sais pas comment combiner le publipostage conditionné maison avec la macro .

Toute idée est la bienvenue .
Merci d’avance