Comment rechercher et remplacer dans plusieurs fichiers Word ?

Si vous avez des dizaines de fichiers Word contenant le même contenu (comme des en-têtes, pieds de page ou un texte spécifique), et que vous devez remplacer ce contenu dans tous les documents, le faire manuellement peut être fastidieux. Ce tutoriel présente deux méthodes pour remplacer rapidement le même contenu ou du contenu différent dans plusieurs documents Word à la fois.

Rechercher et remplacer des textes dans plusieurs documents Word simultanément avec du code VBA
Remplacer facilement différents textes dans plusieurs documents à la fois avec Kutools pour Word

Rechercher et remplacer des textes dans plusieurs documents Word simultanément avec du code VBA

Cette méthode montre comment utiliser du code VBA pour rechercher et remplacer du contenu dans plusieurs documents simultanément.

1. Appuyez sur Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.
2. Cliquez sur "Insérer" > "Module", puis collez le code suivant :

   Sub CommandButton1_Click()
   'Updated by Extendoffice 20180625
   Dim xFileDialog As FileDialog, GetStr(1 To 100) As String
   Dim xFindStr As String
   Dim xReplaceStr As String
   Dim xDoc As Document
   On Error Resume Next
   Set xFileDialog = Application.FileDialog(msoFileDialogFilePicker)
   With xFileDialog
       .Filters.Clear
       .Filters.Add "All WORD File ", "*.docx", 1
       .AllowMultiSelect = True
       i = 1
       If .Show = -1 Then
           For Each stiSelectedItem In .SelectedItems
               GetStr(i) = stiSelectedItem
               i = i + 1
           Next
           i = i - 1
       End If
       Application.ScreenUpdating = False
       xFindStr = InputBox("Find what:", "Kutools for Word", xFindStr)
       xReplaceStr = InputBox("Replace with:", "Kutools for Word", xReplaceStr)
       For j = 1 To i Step 1
           Set xDoc = Documents.Open(FileName:=GetStr(j), Visible:=True)
           Windows(GetStr(j)).Activate
           Selection.Find.ClearFormatting
           Selection.Find.Replacement.ClearFormatting
           With Selection.Find
               .Text = xFindStr
               .Replacement.Text = xReplaceStr
               .Forward = True
               .Wrap = wdFindAsk
               .Format = False
               .MatchCase = False
               .MatchWholeWord = False
               .MatchByte = True
               .MatchWildcards = False
               .MatchSoundsLike = False
               .MatchAllWordForms = False
           End With
           Selection.Find.Execute Replace:=wdReplaceAll
           ActiveDocument.Save
           ActiveWindow.Close
       Next
       Application.ScreenUpdating = True
   End With
   MsgBox "Operation end, please view", vbInformation
   End Sub

3. Appuyez sur F5 pour exécuter le code.
4. Dans la fenêtre Parcourir, sélectionnez les documents que vous souhaitez traiter, puis cliquez sur "OK".

   

5. Dans la zone de saisie "Rechercher", entrez le mot ou la phrase à trouver et cliquez sur "OK".

   

6. Dans la zone de saisie "Remplacer par", entrez le texte de remplacement et cliquez sur "OK".

   

7. Cliquez sur "OK" dans la dernière boîte de dialogue Microsoft Word.

   

Toutes les occurrences du texte spécifié dans les fichiers Word sélectionnés seront remplacées en une seule fois.

Remplacer facilement différents textes dans plusieurs documents à la fois avec Kutools pour Word

La fonctionnalité "Recherche et remplacement en lot" dans Kutools pour Word vous permet de rechercher et remplacer plusieurs éléments de texte dans plusieurs documents Word à la fois.

1. Cliquez sur "Kutools" > "Remplacement en lot".

   

2. Dans la boîte de dialogue Recherche et remplacement en lot, configurez les paramètres :
   1. Cliquez sur le bouton "Ajouter une ligne".
   2. Dans la nouvelle ligne :
      1. Entrez le texte à rechercher sous "Rechercher".
      2. Entrez le texte de remplacement sous "Remplacer".
      3. Le cas échéant, spécifiez un type de recherche, l'emplacement où rechercher et remplacer, la couleur de surlignage et d'autres options nécessaires dans les colonnes respectives.
   3. Cliquez sur le bouton dans la section "Type de fichier" pour ajouter des fichiers Word au lot.
   4. Cliquez sur "Remplacer" ou "Rechercher".
      Astuce : Répétez les étapes 1) et 2) pour ajouter plus de règles de recherche et remplacement.

      

3. Fermez la boîte de dialogue Recherche et remplacement en lot lorsque vous avez terminé.

Pour plus d'informations sur la fonctionnalité "Recherche et remplacement en lot", consultez la page du tutoriel.

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