Comment convertir plusieurs documents Word en fichiers PDF en lot

Il est facile de convertir un seul document Word en PDF en utilisant la fonction "Enregistrer sous" dans Word. Mais que faire si vous devez convertir tous les documents Word d'un dossier en fichiers PDF séparés en une seule fois ? Ce guide vous montrera comment convertir plusieurs documents Word en fichiers PDF en lot dans Word.

Conversion en lot de plusieurs documents Word en fichiers PDF avec VBA
Conversion en lot de plusieurs documents Word en fichiers PDF avec Kutools pour Word

Conversion en lot de plusieurs documents Word en fichiers PDF avec VBA

Le code VBA suivant vous permet de convertir rapidement tous les documents Word d'un dossier en fichiers PDF en une seule fois. Suivez ces étapes :

1. Dans Word, appuyez sur Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.
2. Dans l'éditeur, cliquez sur "Insérer" > "Module", puis copiez et collez le code VBA suivant dans la fenêtre du module.

   Sub ConvertWordsToPdfs()
   'Updated by Extendoffice 20181123
       Dim xIndex As String
       Dim xDlg As FileDialog
       Dim xFolder As Variant
       Dim xNewName As String
       Dim xFileName As String
       Set xDlg = Application.FileDialog(msoFileDialogFolderPicker)
       If xDlg.Show <> -1 Then Exit Sub
       xFolder = xDlg.SelectedItems(1) + "\"
       xFileName = Dir(xFolder & "*.*", vbNormal)
       While xFileName <> ""
           If ((Right(xFileName, 4)) <> ".doc" Or Right(xFileName, 4) <> ".docx") Then
               xIndex = InStr(xFileName, ".") + 1
               xNewName = Replace(xFileName, Mid(xFileName, xIndex), "pdf")
               Documents.Open FileName:=xFolder & xFileName, _
                   ConfirmConversions:=False, ReadOnly:=False, AddToRecentFiles:=False, _
                   PasswordDocument:="", PasswordTemplate:="", Revert:=False, _
                   WritePasswordDocument:="", WritePasswordTemplate:="", Format:= _
                   wdOpenFormatAuto, XMLTransform:=""
               ActiveDocument.ExportAsFixedFormat OutputFileName:=xFolder & xNewName, _
                   ExportFormat:=wdExportFormatPDF, OpenAfterExport:=False, OptimizeFor:= _
                   wdExportOptimizeForPrint, Range:=wdExportAllDocument, From:=1, To:=1, _
                   Item:=wdExportDocumentContent, IncludeDocProps:=True, KeepIRM:=True, _
                   CreateBookmarks:=wdExportCreateNoBookmarks, DocStructureTags:=True, _
                   BitmapMissingFonts:=True, UseISO19005_1:=False
               ActiveDocument.Close
           End If
           xFileName = Dir()
       Wend
   End Sub

   

3. Appuyez sur F5 pour exécuter le code.
4. Une boîte de dialogue "Parcourir" s'affichera. Sélectionnez le dossier contenant les documents Word que vous souhaitez convertir en PDF, puis cliquez sur "OK".

   

Tous les documents Word du dossier sélectionné seront convertis en fichiers PDF séparés.

Conversion en lot de plusieurs documents Word en fichiers PDF avec Kutools pour Word

Si le code VBA est difficile à manipuler, vous pouvez essayer l'utilitaire "Convertir des documents" de Kutools pour Word. Cet outil simplifie le processus, le rendant plus accessible et efficace par rapport aux méthodes manuelles dans Word.

1. Cliquez sur "Kutools Plus" > "Doc/Docx".

   

2. Dans la fenêtre "Convertisseur de format de document", suivez ces étapes :
   1. Sélectionnez "Convertir Docx en Pdf" dans le menu déroulant "Conversion de format".
   2. Cliquez pour ajouter des documents :

      Choisissez "Fichiers" pour ajouter des documents individuels. Choisissez "Dossier" pour ajouter tous les documents d'un dossier spécifique.

   3. Par défaut, les fichiers PDF seront enregistrés au même emplacement que les fichiers source. Pour changer d'emplacement, cliquez sur le bouton "Parcourir" et choisissez une nouvelle destination.
   4. Optionnellement, cochez la case "Supprimer les fichiers source après conversion" pour supprimer les fichiers originaux après la création des PDF.
   5. Optionnellement, cochez la case "Conserver la date de modification des fichiers originaux" pour conserver les métadonnées des fichiers d'origine.
   6. Une fois tous les paramètres terminés, cliquez sur "OK".

   

Maintenant, tous les documents au format .docx ont été convertis avec succès en fichiers PDF.

Meilleurs outils de productivité pour Office

Kutools pour Word - Élevez votre expérience Word avec plus de 100 fonctionnalités remarquables !

🤖 Fonctionnalités AI de Kutools : Assistant IA / Assistant en Temps Réel / Super Polonais (Conserver le format) / Super Traduire (Conserver le format) / Rédaction IA / Correction AI...

📘 Maîtrise des documents : Diviser les pages / Fusionner les documents / Exporter la sélection dans divers formats (PDF/TXT/DOC/HTML...) / Conversion en lot vers PDF...

✏ Édition de contenu : Recherche et remplacement en lot dans plusieurs fichiers / Redimensionner toutes les images / Transposer les lignes et colonnes du tableau / Convertir le tableau en texte...

🧹 Nettoyage sans effort : Éliminer les espaces supplémentaires / Sauts de section / Zones de texte / Liens hypertexte / Pour plus d'outils de suppression, rendez-vous dans le groupe Supprimer...

➕ Insertion créative : Insérer des séparateurs de milliers / Cases à cocher / Boutons radio / Code QR / Code-barres / Images multiples / Découvrez plus dans le groupe Insérer...

🔍 Sélections précises : Identifier des pages spécifiques / Tableaux / Formes / Paragraphes de titre / Améliorez la navigation avec plus de fonctionnalités de sélection...

⭐ Améliorations étoilées : Naviguer vers n'importe quel emplacement / Insertion automatique de texte répétitif / Basculer entre les fenêtres de document /11 outils de conversion...

👉 Vous voulez essayer ces fonctionnalités ? Téléchargez Kutools pour Word maintenant ! 🚀

Téléchargement gratuit     Acheter maintenant     En savoir plus sur Kutools pour Word

 

Meilleurs outils de productivité pour Office

Kutools pour Word - 100+ outils pour Word

• 🤖 Fonctionnalités AI de Kutools : Assistant IA / Assistant en Temps Réel / Super Polonais / Super Traduire / Rédaction IA / Correction AI
• 📘 Maîtrise des documents : Diviser les pages / Fusionner les documents / Conversion en lot vers PDF
• ✏ Édition de contenu : Recherche et remplacement en lot / Redimensionner toutes les images
• 🧹 Nettoyage sans effort : Supprimer les espaces supplémentaires / Supprimer les sauts de section
• ➕ Insertion créative : Insérer des séparateurs de milliers / Insérer des cases à cocher / Créer des codes QR

Téléchargement gratuit Acheter maintenant En savoir plus sur Kutools