Skip to main content

Hoe te zoeken en vervangen in meerdere bestanden in Word?

Author: Amanda Li Last Modified: 2025-05-29

Als u tientallen Word-bestanden heeft die dezelfde inhoud bevatten (zoals kopteksten, voetteksten of specifieke tekst), en u moet deze inhoud in alle documenten vervangen, kan dit handmatig vervelend zijn. Deze handleiding introduceert twee methoden om snel dezelfde of verschillende inhoud in meerdere Word-documenten tegelijk te vervangen.

Zoek en vervang tekst in meerdere Word-documenten tegelijk met VBA-code
Vind en vervang eenvoudig verschillende teksten in meerdere documenten tegelijk met Kutools voor Word

Zoek en vervang tekst in meerdere Word-documenten tegelijk met VBA-code

Deze methode laat zien hoe u VBA-code kunt gebruiken om inhoud in meerdere documenten tegelijk te zoeken en te vervangen.

  1. Druk op Alt + F11 om het Microsoft Visual Basic for Applications-venster te openen.
  2. Klik op "Invoegen" > "Module", en plak de volgende code: 
    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. Druk op F5 om de code uit te voeren.
  4. Selecteer in het Blader-venster de documenten die u wilt verwerken en klik op "OK".
    Browse window
  5. Voer in het invoerveld "Zoeken naar" het woord of de zin in dat u wilt vinden en klik op "OK".
    Find what box
  6. Voer in het invoerveld "Vervangen door" de vervangende tekst in en klik op "OK".
    Replace with box
  7. Klik op "OK" in het laatste dialoogvenster van Microsoft Word.
    Confirmation dialog

Alle gevallen van de opgegeven tekst in de geselecteerde Word-bestanden worden tegelijk vervangen.

Vind en vervang eenvoudig verschillende teksten in meerdere documenten tegelijk met Kutools voor Word

De functie "Batch Zoeken en Vervangen" in Kutools voor Word stelt u in staat om meerdere tekstitems in verschillende Word-documenten tegelijk te zoeken en te vervangen.

Kutools voor Word,uitgerust met AI 🤖, biedt meer dan 100 handige functies om uw taken te vereenvoudigen.
  1. Klik op "Kutools" > "Batch Vervanging".
    Batch Replacement button
  2. Configureer in het venster Batch Zoeken en Vervangen de instellingen:
    1. Klik op de knop "Rij toevoegen".
    2. In de nieuwe rij:
      1. Voer de tekst die u wilt zoeken in onder "Zoeken".
      2. Voer de vervangende tekst in onder "Vervangen".
      3. Geef eventueel een zoektype, locatie waar gezocht en vervangen moet worden, markeringskleur en andere opties op zoals nodig in de respectieve kolommen.
    3. Klik op de Add button knop in de sectie "Bestandstype" om Word-bestanden aan de batch toe te voegen.
    4. Klik op "Vervangen" of "Zoeken".
      Tip: Herhaal stappen 1) en 2) om meer zoek- en vervangregels toe te voegen.
      Batch Find and Replace configuration
  3. Sluit het venster Batch Zoeken en Vervangen wanneer u klaar bent.

Opmerkingen:

  • Als u op "Zoeken" klikt, verschijnen de overeenkomsten onder het tabblad "Voorbeeldresultaat". Om vervangingen later toe te passen, ga terug naar het tabblad "Zoeken en Vervangen".
  • Als u op "Vervangen" klikt, worden alle overeenkomsten onmiddellijk vervangen en weergegeven onder "Voorbeeldresultaat".
  • Als er markeringskleuren zijn opgegeven, worden de vervangingen in uw Word-documenten dienovereenkomstig ingekleurd.

Voor meer informatie over de functie "Batch Zoeken en Vervangen", bekijk de handleidingpagina.

Kutools voor Word is de ultieme Word-add-in die uw werk stroomlijnt en uw vaardigheden in documentverwerking verbetert. Haal het nu!

Beste productiviteitstools voor kantoor

Kutools voor Word – Til uw Word-ervaring naar een hoger niveau met meer dan 100 indrukwekkende functies!

🤖 Kutools AI-functies: AI Assistent / Realtime Assistent / Super Pools (Formaat behouden) / Super Vertalen (Formaat behouden) / AI Redactie / AI Proeflezen...

📘 Documentbeheersing: Pagina’s splitsen / Documenten samenvoegen / Selectie exporteren in diverse formaten (PDF/TXT/DOC/HTML...) / Batch converteren naar PDF...

✏ Inhoud bewerken: Batch Zoeken en Vervangen in meerdere bestanden / Alle afbeeldingen formaat wijzigen / Rij- en kolomindeling van tabellen transponeren / Tabel naar tekst converteren...

🧹 Moeiteloos opschonen: Verwijder extra spaties / sectie-eindes / tekstvakken / hyperlinks / Voor meer verwijderopties, ga naar de groep Verwijderen...

➕ Creatieve invoegingen: Voeg duizendtallen-scheidingstekens toe / selectievakjes / keuzerondjes / QR-code / barcode / meerdere afbeeldingen / Ontdek meer in de groep Invoegen...

🔍 Nauwkeurige selecties: Selecteer specifieke pagina’s / tabellen / vormen / kopalinea’s / Verbeter de navigatie met meer Selecteer -functies...

⭐ Ster-upgrades: Navigeer naar elke locatie / Automatisch herhalende tekst invoegen / Wissel tussen documentvensters /11 conversietools...

Kutools and Kutools Plus tabs on the Word Ribbon
👉 Wilt u deze functies uitproberen? Download Kutools voor Word nu! 🚀
 

Beste productiviteitstools voor kantoor

Kutools voor Word – 100+ tools voor Word

Gratis downloaden Nu kopen Meer informatie over Kutools