Hoe dubbele paragrafen in een Word-document te vinden en markeren?

Author: Xiaoyang Last Modified: 2025-05-29

Stel dat je een groot Word-document hebt dat mogelijk honderden pagina's telt, en nu wil je controleren of er dubbele paragrafen zijn en deze markeren om ze duidelijk zichtbaar te maken, zodat je de dubbele zinnen kunt verwerken. Hoe kun je snel en eenvoudig de dubbele paragrafen vinden en markeren in een Word-document?

Zoek en markeer de dubbele paragrafen in een Word-document met VBA-code

Zoek en markeer de dubbele paragrafen in een Word-document met VBA-code

Om de dubbele paragrafen in een Word-document te vinden en te markeren, kan de volgende VBA-code je helpen. Volg deze stappen:

1. Houd de toetsen ALT + F11 ingedrukt om het venster Microsoft Visual Basic for Applications te openen.

2. Klik vervolgens op Invoegen > Module, kopieer en plak de onderstaande code in de geopende lege module:

VBA-code: Zoek en markeer de dubbele paragrafen in een Word-document:

Sub highlightdup()
    Dim I, J As Long
    Dim xRngFind, xRng As Range
    Dim xStrFind, xStr As String
    Options.DefaultHighlightColorIndex = wdYellow
    Application.ScreenUpdating = False
    With ActiveDocument
        For I = 1 To .Paragraphs.Count - 1
            Set xRngFind = .Paragraphs(I).Range
            If xRngFind.HighlightColorIndex <> wdYellow Then
                For J = I + 1 To .Paragraphs.Count
                    Set xRng = .Paragraphs(J).Range
                    If xRngFind.Text = xRng.Text Then
                        xRngFind.HighlightColorIndex = wdBrightGreen
                        xRng.HighlightColorIndex = wdYellow
                    End If
                Next
            End If
        Next
    End With
End Sub

3. Druk vervolgens op de F5-toets om deze code uit te voeren. Alle dubbele zinnen worden tegelijk gemarkeerd. De eerst weergegeven dubbele paragrafen worden gemarkeerd in groen, en andere duplicaten worden gemarkeerd in geel. Zie screenshot:

All duplicate sentences highlighted with the first displayed duplicate paragraphs highlighted in green and other duplicates in yellow

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...