KutoolsforOffice — Un'unica soluzione, cinque potenti strumenti.Ottenere di più con meno sforzo.

Come trovare ed evidenziare i paragrafi duplicati in un documento Word?

AutoreXiaoyang Data di modifica

Immagina di avere un ampio documento Word, anche di centinaia di pagine, e di voler verificare la presenza di paragrafi duplicati per evidenziarli in modo chiaro e immediato, facilitando così la gestione delle ripetizioni. Come puoi trovare ed evidenziare rapidamente e facilmente i paragrafi duplicati in un documento Word?

Trova ed evidenzia i paragrafi duplicati in un documento Word con codice VBA


Trova ed evidenzia i paragrafi duplicati in un documento Word con codice VBA

Per individuare ed evidenziare i paragrafi duplicati in un documento Word, il seguente codice VBA ti sarà di grande aiuto. Segui questi semplici passaggi:

1. Tieni premuti i tasti ALT + F11 per aprire la finestra di Microsoft Visual Basic for Applications.

2. Clicca quindi su Inserisci > Modulo e copia e incolla il codice seguente nel modulo vuoto appena aperto:

Codice VBA: Trova ed evidenzia i paragrafi duplicati in un documento Word:

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. Premi quindi il tasto F5 per eseguire questo codice: tutti i paragrafi duplicati verranno evidenziati immediatamente. Il primo paragrafo duplicato visualizzato sarà evidenziato in verde, mentre gli altri duplicati in giallo. Vedi screenshot:

Tutte le frasi duplicate evidenziate, con i primi paragrafi duplicati visualizzati evidenziati in verde e gli altri duplicati in giallo

Migliori strumenti per la produttività in Office

Kutools per Word – Migliora la tua esperienza con Word grazie a oltre 100 funzionalità eccezionali!

🤖Funzionalità KUTOOLS AI: Assistente AI / Assistente in Tempo Reale / Super Lucida (Mantieni formato) / Super Traduci (Mantieni formato) / Redazione AI / Correzione AI

📘Padronanza dei documenti: Dividi pagine, unisci documenti, esporta la selezione in vari formati (PDF, TXT, DOC, HTML…) e conversione batch in PDF

Modifica contenuti: Trova e sostituisci in batch su più file / Ridimensiona tutte le immagini / Trasponi righe e colonne della tabella / Converti tabella in testo

🧹Pulizia senza sforzo: Elimina in un attimo spazi extra, interruzioni di sezione, caselle di testo e collegamenti ipertestuali. Per altri strumenti di rimozione, vai al gruppo Rimuovi

Inserimenti creativi: Inserisci separatori delle migliaia, caselle di controllo, pulsanti di opzione, codici QR, codici a barre e immagini multiple. Scopri di più nel gruppo Inserisci

🔍Selezioni precise: Individua con precisione pagine specifiche, tabelle, forme, paragrafi di intestazione e migliora la navigazione con altre funzionalità ...Seleziona...

Miglioramenti stellari: Passa a qualsiasi posizione / Inserimento automatico di testo ripetitivo / Alterna tra i documenti Windows / 11 strumenti di conversione Strumenti di...

🌍Supporta oltre 40 lingue: Usa Kutools nella tua lingua preferita – tra cui inglese, spagnolo, tedesco, francese, cinese e molte altre!

Kutools for Word schede sulla barra multifunzione
 
 

Office Tab- Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Apri e crea più documenti in nuove schede della stessa finestra, anziché in nuove finestre.
  • Aumenta la tua produttività del 50 % e riduci centinaia di clic del mouse ogni giorno!

✨ Kutools for Office – Un’installazione, cinque strumenti potenti!

Include Office Tab Pro·Kutools per Excel·Kutools per Outlook·Kutools per Word·Kutools for PowerPoint

📦 Ottieni tutti gli 5 strumenti in un’unica suite | 🔗 Integrazione perfetta con Microsoft Office | ⚡ Risparmia tempo e aumenta immediatamente la produttività

Migliori strumenti per la produttività in Office

Kutools per Word- Strumenti 100+ per Word