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.
- Appuyez sur Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.
- 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
- Appuyez sur F5 pour exécuter le code.
- Dans la fenêtre Parcourir, sélectionnez les documents que vous souhaitez traiter, puis cliquez sur "OK".
- Dans la zone de saisie "Rechercher", entrez le mot ou la phrase à trouver et cliquez sur "OK".
- Dans la zone de saisie "Remplacer par", entrez le texte de remplacement et cliquez sur "OK".
- 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.
- Cliquez sur "Kutools" > "Remplacement en lot".
- Dans la boîte de dialogue Recherche et remplacement en lot, configurez les paramètres :
- Cliquez sur le bouton "Ajouter une ligne".
- Dans la nouvelle ligne :
- Entrez le texte à rechercher sous "Rechercher".
- Entrez le texte de remplacement sous "Remplacer".
- 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.
- Cliquez sur le
bouton dans la section "Type de fichier" pour ajouter des fichiers Word au lot.
- Cliquez sur "Remplacer" ou "Rechercher". Astuce : Répétez les étapes 1) et 2) pour ajouter plus de règles de recherche et remplacement.
- Fermez la boîte de dialogue Recherche et remplacement en lot lorsque vous avez terminé.
Remarques :
- Si vous cliquez sur "Rechercher", les correspondances apparaîtront sous l'onglet "Aperçu des résultats". Pour appliquer les remplacements ensuite, revenez à l'onglet "Rechercher et remplacer".
- Si vous cliquez sur "Remplacer", toutes les correspondances sont immédiatement remplacées et affichées sous "Aperçu des résultats".
- Si des couleurs de surlignage ont été spécifiées, les remplacements dans vos documents Word seront codés en couleur en conséquence.
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 – Optimisez votre expérience Word avec plus de 100 fonctionnalités remarquables !
🤖 Fonctionnalités de Kutools IA : Assistant IA / Assistant en Temps Réel / Super Polish (préserver le format) / Super Traduire (préserver le format) / Rédaction IA / Correction AI...
📘 Maîtrise des documents : Diviser les pages / Fusionner les documents / Exporter une solution dans différents formats (PDF/TXT/DOC/HTML...) / Conversion en lot vers PDF...
✏ Modification du texte : Recherche et remplacement en lot sur plusieurs fichiers / Redimensionner toutes les images / Transposer le tableau lignes et Colonnes / Convertir le tableau en texte...
🧹 Nettoyage sans effort : Éliminez les espaces supplémentaires / Sauts de section / Zone 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 / Case à cocher / Bouton radio / Code QR / Code-barres / Plusieurs images / Découvrez davantage dans le groupe Insérer...
🔍 Sélection précise : Ciblez des pages spécifiques / Tableaux / Forme / Paragraphe de titre / Améliorez la navigation avec plus de fonctions de Sélectionner...
⭐ Optimisations exclusives : Accéder à n’importe quelle plage / Insérer automatiquement du texte répétitif / Basculer entre les fenêtres du document /11 outils de conversion...
🌍 Prend en charge plus de40 langues : Utilisez Kutools dans la langue de votre choix – Prise en charge de l’Anglais, de l’Espagnol, de l’Allemand, du Français, du Chinois et de bien d’autres encore !

✨ Kutools pour Office – Une installation, cinq outils puissants !
Inclus Office Tab Pro · Kutools pour Excel · Kutools pour Outlook · Kutools pour Word · Kutools pour PowerPoint
📦 Obtenez les5 outils dans une seule suite | 🔗 Intégration transparente avec Microsoft Office | ⚡ Gagnez du temps et augmentez votre productivité instantanément
Meilleurs outils de productivité pour Office
Kutools pour Word – 100+ outils pour Word
- 🤖 Fonctionnalités de Kutools IA : Assistant IA / Assistant en Temps Réel / Super Polish / Super Traduire / Rédaction IA / Correction AI
- 📘 Maîtrise des documents : Diviser les pages / Fusionner les documents / Conversion en lot vers PDF
- ✏ Modification du texte : 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
- 🌍 Prend en charge plus de40 langues : Kutools parle votre langue – plus de40 langues prises en charge !