Note: The other languages of the website are Google-translated. Back to English
Se connecter  \/ 
x
or
x
S'inscrire  \/ 
x

or

Comment rechercher et remplacer plusieurs mots en même temps dans un document Word?

Word fournit une fonction Rechercher et remplacer pour rechercher toutes les instances d'un mot ou d'une expression et les remplacer par un nouveau mot en même temps. Mais si vous souhaitez rechercher et remplacer différents mots en même temps, cette fonction intégrée ne peut pas vous aider. Dans cet article, nous parlons d'une méthode VBA pour rechercher et remplacer plusieurs mots différents en même temps dans un document Word.

Rechercher et remplacer plusieurs mots en même temps dans Word avec du code VBA
Trouvez et remplacez facilement plusieurs mots en même temps dans Word avec une fonctionnalité incroyable


Rechercher et remplacer plusieurs mots en même temps dans Word avec du code VBA

Veuillez procéder comme suit pour rechercher et remplacer plusieurs mots en même temps dans un document Word.

1. Ouvrez le document Word que vous souhaitez rechercher et remplacer plusieurs mots en même temps, puis appuyez sur le bouton autre + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. dans le Microsoft Visual Basic pour applications fenêtre, cliquez sur insérer > Module. Copiez ensuite le code VBA ci-dessous dans la fenêtre Module.

Code VBA: recherchez et remplacez plusieurs mots en même temps dans Word

Sub FindAndReplaceMultiItems()
'Update by ExtendOffice 2018/10/25
    Dim xFind As String
    Dim xReplace As String
    Dim xFindArr, xReplaceArr
    Dim I As Long
    Application.ScreenUpdating = False
    xFind = InputBox("Enter items to be found here,seperated by comma: ", "Kutools for Word")
    xReplace = InputBox("Enter new items here, seperated by comma: ", "Kutools for Word")
    xFindArr = Split(xFind, ",")
    xReplaceArr = Split(xReplace, ",")
    If UBound(xFindArr) <> UBound(xReplaceArr) Then
        MsgBox "Find and replace characters must be equal.", vbInformation, "Kutools for Word"
        Exit Sub
    End If
    For I = 0 To UBound(xFindArr)
        Selection.HomeKey Unit:=wdStory
        With Selection.Find
            .ClearFormatting
            .Replacement.ClearFormatting
            .Text = xFindArr(I)
            .Replacement.Text = xReplaceArr(I)
            .Format = False
            .MatchWholeWord = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
    Next
    Application.ScreenUpdating = True
End Sub

3. appuie sur le F5 clé pour exécuter le code.

4. Dans le premier Kutools pour Word boîte de dialogue, entrez les mots que vous trouverez et remplacez dans la zone de texte, séparez-les par une virgule, puis cliquez sur le bouton OK bouton. Voir la capture d'écran:

5. Dans le second Kutools pour Word boîte de dialogue, entrez les nouveaux mots que vous allez remplacer (ces mots doivent également être séparés par des virgules), puis cliquez sur le bouton OK .

A Noter: Dans ce cas, tous «KTE» dans ce document sera remplacé par "Nouveau", et «KTO» et «KTW» sera remplacé par "Tester" et "Terminer". Veuillez les modifier selon vos besoins.


Trouvez et remplacez facilement plusieurs mots en même temps dans Word avec une fonctionnalité incroyable

La Rechercher et remplacer par lots caractéristique de Kutools pour Word peut aider à trouver et remplacer facilement différents textes dans un document ou sur plusieurs documents en même temps.

Avant d'appliquer cette fonctionnalité, veuillez prendre quelques minutes pour téléchargez et installez-le d'abord.

1. Lancez l'application Microsoft Word, cliquez sur Kutools Plus > Rechercher et remplacer par lots.

2. dans le Rechercher et remplacer par lots fenêtre, veuillez configurer comme suit.

  • 2.1 cliquez sur le bouton> Ajouter un fichier or ajouter un dossier pour ajouter un ou plusieurs documents dans lesquels vous trouverez et remplacez plusieurs mots.
  • 2.2 Cliquez sur le Ajouter une rangée pour insérer les champs de recherche et de remplacement. Si vous souhaitez rechercher et remplacer trois textes différents en même temps, veuillez créer trois lignes.
  • 2.3 Dans chaque ligne, entrez les mots existants que vous allez remplacer par un nouveau dans le Find colonne, puis entrez les nouveaux mots dans la remplacer colonne.
  • 2.4 Spécifiez le Type de recherche pour chaque ligne.
  • 2.5 Dans le Retrouver dans colonne, choisissez où appliquer la recherche et le remplacement. Il comprend Document principal, En-tête et Pied de page dans cette section. Vous pouvez en choisir un, deux ou tous en fonction de vos besoins.
  • 2.6. Cliquez sur l' remplacer bouton pour démarrer l'opération. Voir la capture d'écran:

Ensuite, les mots spécifiques sont remplacés dans les documents sélectionnés en même temps.

Pointe: Vous pouvez mettre en évidence le résultat avec une couleur d'arrière-plan en spécifiant une certaine couleur dans le Surligner colonne pour une ligne.

  Si vous souhaitez bénéficier d'un essai gratuit (60 jours) de cet utilitaire, veuillez cliquer pour le télécharger, puis passez à appliquer l'opération selon les étapes ci-dessus.


Outils de productivité Word recommandés

 

Kutools For Word - Plus de 100 fonctionnalités avancées pour Word, économisez 50% de votre temps

  • Les opérations compliquées et répétées peuvent être effectuées une seule fois en quelques secondes.
  • Insérez simultanément plusieurs images dans des dossiers dans un document Word.
  • Fusionner et combiner plusieurs fichiers Word dans des dossiers en un seul avec l'ordre souhaité.
  • Divisez le document actuel en documents séparés selon l'en-tête, le saut de section ou d'autres critères.
  • Convertissez des fichiers entre Doc et Docx, Docx et PDF, collection d'outils pour les conversions et la sélection courantes, etc.
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    excel guy · 4 months ago
    Thanks for the project, Could you make it the way we can also replace letters in words. For example if i want to change Dollar as DoLLar it does not function.
  • To post as a guest, your comment is unpublished.
    Vern · 9 months ago
    In the first instruction (Find And Replace Multiple Words At The Same Time In Word With VBA Code), it does not find instances where the word to be replaced falls in the middle of a word (For example, .com following a website name). Can this be modified to do so?
  • To post as a guest, your comment is unpublished.
    AJs · 9 months ago
    What if I'm trying to replace commas?
    • To post as a guest, your comment is unpublished.
      crystal · 9 months ago
      The VBA code can't help to replace commas. You can apply Kutools to achieve.
  • To post as a guest, your comment is unpublished.
    Ajs · 9 months ago
    After hitting Replace it just goes to Preview and doesn't do anything further.
    • To post as a guest, your comment is unpublished.
      crystal · 9 months ago
      Hi Ajs,
      All required words have been successfully replaced at once after hitting the Replace button. It goes to the Preview tab to help you know how many words have been successfully replaced. After that, close the dialog box.
  • To post as a guest, your comment is unpublished.
    Walter Mendes · 1 years ago
    Hi! First, congratulations for your work: this macro is very useful and interesting! I would like, neverthless, you help me with one thing. I am a proofreader and would like the replacements would highlithed in green or red color. How can I do this? Is there a code line I could use?
    • To post as a guest, your comment is unpublished.
      crystal · 1 years ago
      Hi,
      The Batch Find and Replace feature of Kutools for Word can perfectly solve your problem, you can have a try.
  • To post as a guest, your comment is unpublished.
    JM · 1 years ago
    Hi how can this macro be revised to take more key words? I have about 170 words that I wold like to find and replace
    • To post as a guest, your comment is unpublished.
      crystal · 1 years ago
      Hi JM,
      After running the code, a Kutools for Excel dialog box will pop up, please enter the keywords you will find and separate them with commas.
  • To post as a guest, your comment is unpublished.
    Ranjit Jagtap · 2 years ago
    How to find and select multiple words at the same time
    • To post as a guest, your comment is unpublished.
      crystal · 1 years ago
      Hi,
      After running the code, a Kutools for Excel dialog box will pop up, please enter the keywords you will find and separate them with commas.
  • To post as a guest, your comment is unpublished.
    Shailesh Pateliya · 2 years ago
    Hi, This works well with English Words. Now I am doing a document where I translate English to Gujarati. So, when I apply this, (Find English Words) and (Replace with Gujarati words), it does change but it appears like "???". Doesn't show the Gujarati word but just question marks? Any further help? Please.
    • To post as a guest, your comment is unpublished.
      Kirill · 10 months ago
      Hello Shailesh, facing the same issue. Did you find a solution to it. Am also trying to figure out how to change from Chinese to English.

  • To post as a guest, your comment is unpublished.
    Adam · 2 years ago
    Any way to make this case sensitive?
  • To post as a guest, your comment is unpublished.
    rishabh jain · 2 years ago
    will this work in office Excel 365
  • To post as a guest, your comment is unpublished.
    jaka1 · 2 years ago
    Toto jsem hledal, jen potřebuji pro hledaný text přidat nějaké formátování. Jak toho dosáhnu?