Come trovare ed evidenziare i paragrafi duplicati in un documento Word?
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:

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!

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
- 🤖KUTOOLS AI Funzionalità:Assistente AI/Assistente in Tempo Reale/Super Lucida/Super Traduci/Redazione AI/Correzione AI
- 📘Padronanza dei documenti:Dividi pagine/Unisci Documenti/Conversione batch in PDF
- ✏Modifica contenuti:Trova e sostituisci in batch/Ridimensiona tutte le immagini
- 🧹Pulizia senza sforzo:Rimuovi spazi extra/Rimuovi Interruzione di sezione
- ➕Inserimenti creativi:Inserisci separatori delle migliaia/Inserisci Casella di Controllo/Crea Codice QR
- 🌍Supporta oltre 40 lingue: Kutools parla la tua lingua – sono supportate oltre 40 lingue!