Zoeken en Vervangen teksten in Word-hoofdtekst, kopteksten en voetteksten

Normaal gesproken helpt de functie Zoeken en vervangen u om specifieke teksten tegelijkertijd te zoeken en te vervangen in de hoofdtekst, koptekst en voettekst van een Word-document. Hebt u ooit geprobeerd om teksten uitsluitend in de koptekst en voettekst van een Word-document te zoeken en te vervangen? Of wilt u meerdere verschillende teksten tegelijk vervangen in één Word-document of in meerdere documenten? Deze handleiding laat u enkele methoden zien om dit voor elkaar te krijgen.

Zoeken en Vervangen dezelfde tekst in een Word-document met de Zoeken en Vervangen-functie
Zoeken en Vervangen dezelfde tekst alleen in de koptekst- en voettekstsectie met de VBA-code
Zoeken en Vervangen verschillende teksten tegelijkertijd met een geweldige functie

---

Zoeken en Vervangen dezelfde tekst in een Word-document met de Zoeken en Vervangen-functie

De functie Zoeken en Vervangen in een Word-document is kinderlijk eenvoudig te gebruiken.

1. Open het document met de woorden die u wilt vervangen en druk tegelijkertijd op de toetsen Ctrl+H om het dialoogvenster Zoeken en Vervangen te openen.

2. Voer in het dialoogvenster Zoeken en Vervangen, onder het tabblad Vervangen, de oude tekst en de nieuwe tekst respectievelijk in de velden Zoeken naar en Vervangen door in en klik vervolgens op de knop Alles vervangen. Zie schermafbeelding:

Opmerking: U kunt op de knop Meer klikken om meer zoekopties te vinden, zoals u nodig hebt.

3. Er verschijnt vervolgens een dialoogvenster met het aantal uitgevoerde vervangingen. Klik op OK om af te ronden.

---

Zoeken en Vervangen dezelfde tekst alleen in de koptekst- en voettekstsectie met de VBA-code

Als u alleen in de koptekst en voettekst van een document wilt zoeken en vervangen, helpt de methode in deze sectie u daarbij.

1. Open het document waarin u tekst in de koptekst en voettekst wilt zoeken en vervangen, en druk op de toetsen Alt+F11 om het venster Microsoft Visual Basic for Applications te openen.

2. Klik in het venster Microsoft Visual Basic for Applications op Invoegen > Module en kopieer vervolgens de onderstaande VBA-code naar het modulevenster.

VBA-code: Zoeken en Vervangen tekst alleen in koptekst en voettekst

Sub FindAndReplaceOfHeaderAndFooter()
'Update by Extendoffice 20190805
    Dim xDoc As Document
    Dim xSelection As Selection
    Dim xSec As Section
    Dim xHeader As HeaderFooter
Dim xFooter As HeaderFooter
On Error Resume Next
    Set xDoc = Application.ActiveDocument
    For Each xSec In xDoc.Sections
        For Each xHeader In xSec.Headers
            xHeader.Range.Select
            Set xSelection = xDoc.Application.Selection
            With xSelection.Find
                .Text = "I've found header text" 'Enter the old header text here!
               .Replacement.Text = "I've found header text" 'Enter the new header text here!
                .Wrap = wdFindContinue
                .Execute Replace:=wdReplaceAll
            End With
        Next xHeader
        For Each xFooter In xSec.Footers
            xFooter.Range.Select
            Set xSelection = xDoc.Application.Selection
            With xSelection.Find
                .Text = "I've found footer text" 'Enter the old footer text here!
                .Replacement.Text = "I've found footer text" 'Enter the old footer text here!
                .Wrap = wdFindContinue
                .Execute Replace:=wdReplaceAll
            End With
        Next xFooter
    Next xSec
    xDoc.ActiveWindow.ActivePane.Close
    If xDoc.ActiveWindow.View.SplitSpecial = wdPaneNone Then
        xDoc.ActiveWindow.View.Type = wdPrintView
    Else
        xDoc.ActiveWindow.View.Type = wdPrintView
    End If
    xDoc.Activate
End Sub

Opmerking: Vervang in de code „Zoek koptekst” en „Zoek voettekst” door de teksten die u wilt zoeken in de koptekst en voettekst, en vervang „Ik heb koptekst gevonden” en „Ik heb voettekst gevonden” door de nieuwe koptekst en voettekst.

3. Druk op de toets F5 om de code uit te voeren. De specifieke teksten in de koptekst en voettekst worden dan vervangen door Nieuwe tekst.

---

Zoeken en Vervangen verschillende teksten tegelijkertijd met een geweldige functie

1. Start de applicatie Microsoft Word en klik op KUTOOLS PLUS > Batch Zoeken en Vervangen.

2. In het venster Batch Zoeken en Vervangen voert u de volgende stappen uit.

• 2,1 Klik op de knop Bestand Toevoegen of Map Toevoegen om de documenten toe te voegen waarin u teksten wilt zoeken en vervangen.
  
• 2,2 Klik op de knop Rij toevoegen om Zoeken en Vervangen-velden in te voegen. Wilt u tegelijkertijd drie verschillende teksten zoeken en vervangen? Maak dan drie rijen aan.
• 2,3 Voer in elke rij de bestaande teksten die u wilt vervangen in de kolom Zoeken in, en voer vervolgens de nieuwe tekst in de kolom Vervangen in.
• 2,4 Geef het zoektype voor elke rij op.
• 2,5 Kies in de kolom Zoeken in waar u Zoeken en Vervangen wilt toepassen. De beschikbare opties in dit gedeelte zijn Hoofddocument, Koptekst en Voettekst. U kunt er één, twee of allemaal selecteren, afhankelijk van uw behoeften.
• 2,6. Klik op de knop Vervangen om de bewerking te starten. Zie schermafbeelding:

Vervolgens worden alle specifieke teksten in de geselecteerde documenten vervangen.

Tip: U kunt het resultaat markeren met een achtergrondkleur door een specifieke kleur op te geven in de kolom Markeringskleur voor een rij.

---

Gerelateerde artikelen