Come trovare e sostituire più parole contemporaneamente in un documento di Word?

Word fornisce una funzione Trova e sostituisci per trovare tutte le istanze di una parola o frase e sostituirle contemporaneamente con una nuova parola. Ma se vuoi trovare e sostituire contemporaneamente parole diverse, questa funzione integrata non può aiutarti. In questo articolo, stiamo parlando di un metodo VBA per trovare e sostituire più parole diverse contemporaneamente nel documento di Word.

Trova e sostituisci più parole contemporaneamente in Word con codice VBA
Trova e sostituisci facilmente più parole contemporaneamente in Word con una funzionalità straordinaria

Trova e sostituisci più parole contemporaneamente in Word con codice VBA

Si prega di fare quanto segue per trovare e sostituire più parole contemporaneamente in un documento di Word.

1. Aprire il documento di Word che si desidera trovare e sostituire più parole contemporaneamente, quindi premere il tasto altro + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.

2. Nel Microsoft Visual Basic, Applications Edition finestra, fare clic inserire > Modulo. Quindi copia sotto il codice VBA nella finestra del modulo.

Codice VBA: trova e sostituisci più parole contemporaneamente in Word

Sub FindAndReplaceMultiItems()
'Update by ExtendOffice 2018/10/25
    Dim xFind As String
    Dim xReplace As String
    Dim xFindArr, xReplaceArr
    Dim I As Long
    Application.ScreenUpdating = False
    xFind = InputBox("Enter items to be found here,seperated by comma: ", "Kutools for Word")
    xReplace = InputBox("Enter new items here, seperated by comma: ", "Kutools for Word")
    xFindArr = Split(xFind, ",")
    xReplaceArr = Split(xReplace, ",")
    If UBound(xFindArr) <> UBound(xReplaceArr) Then
        MsgBox "Find and replace characters must be equal.", vbInformation, "Kutools for Word"
        Exit Sub
    End If
    For I = 0 To UBound(xFindArr)
        Selection.HomeKey Unit:=wdStory
        With Selection.Find
            .ClearFormatting
            .Replacement.ClearFormatting
            .Text = xFindArr(I)
            .Replacement.Text = xReplaceArr(I)
            .Format = False
            .MatchWholeWord = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
    Next
    Application.ScreenUpdating = True
End Sub

3. premi il F5 chiave per eseguire il codice.

4. Nella prima Kutools for Word finestra di dialogo, inserisci le parole multiple che troverai e sostituirai nella casella di testo e separale con una virgola, quindi fai clic su OK pulsante. Vedi screenshot:

5. Nella seconda Kutools for Word finestra di dialogo, immettere le nuove parole con cui sostituire (anche queste parole devono essere separate da virgole), quindi fare clic sul pulsante OK pulsante.

Nota: In questo caso, tutto "KTE" in questo documento verrà sostituito con "Nuovo", ed "KTO" ed "KTW" sarà sostituito con "Test" ed "Finire". Si prega di modificarli in base alle proprie esigenze.

Trova e sostituisci facilmente più parole contemporaneamente in Word con una funzionalità straordinaria

1. Avviare l'applicazione Microsoft Word, fare clic su Kutools Plus > Trova e sostituisci in batch.

2. Nel Trova e sostituisci in batch finestra, configurare come segue.

• 2.1 fare clic su pulsante> Aggiungi File or aggiungi cartella per aggiungere uno o più documenti in cui troverai e sostituirai più parole.
  
• 2.2 Fare clic su Aggiungi riga pulsante per inserire i campi di ricerca e sostituzione. Se desideri trovare e sostituire tre testi diversi contemporaneamente, crea tre righe.
• 2.3 In ogni riga, inserisci le parole esistenti che sostituirai con una nuova nel file Trovare colonna, quindi inserisci le nuove parole nel file sostituire colonna.
• 2.4 Specificare il file Tipo di ricerca per ogni riga.
• 2.5 Nel Trovare in colonna, scegli dove applicare la ricerca e sostituzione. Include Documento principale, testata ed footer in questa sezione. Puoi sceglierne uno, due o tutti in base alle tue esigenze.
• 2.6. Fare clic sul sostituire pulsante per avviare l'operazione. Vedi screenshot:

Quindi le parole specifiche vengono sostituite contemporaneamente nei documenti selezionati.

Mancia: È possibile evidenziare il risultato con il colore di sfondo specificando un determinato colore nel file Highlight colonna per una riga.

  Se desideri avere una prova gratuita (60 giorni) di questa utility, fare clic per scaricarlo, quindi andare ad applicare l'operazione secondo i passaggi precedenti.

I migliori strumenti per la produttività in ufficio

Kutools for Word - Migliora la tua esperienza con le parole con Over 100 Caratteristiche notevoli!

🤖 Assistente AI di Kutools: Trasforma la tua scrittura con l'intelligenza artificiale - Genera contenuto  /  Riscrivere il testo  /  Riepilogare i documenti  /  Richiedi informazioni sulla base del documento, tutto all'interno di Word

📘 Padronanza dei documenti: Pagine divise  /  Unisci documenti  /  Esporta la selezione in vari formati (PDF/TXT/DOC/HTML...)  /  Converti in batch in PDF  /  Esporta pagine come immagini  /  Stampa più file contemporaneamente...

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

🧹 Pulito senza sforzo: Spazza via Spazi extra  /  Interruzioni di sezione  /  Tutte le intestazioni  /  Caselle di testo  /  Collegamenti ipertestuali  / Per ulteriori strumenti di rimozione, vai al nostro Rimuovi gruppo...

➕ Inserti creativi: Inserisci Mille separatori  /  Caselle di controllo  /  Pulsanti di scelta  /  QR Code  /  Codice a barre  /  Tabella della linea diagonale  /  Didascalia dell'equazione  /  Didascalia immagine  /  Didascalia  /  Immagini multiple  / Scopri di più nella Inserisci gruppo...

???? Selezioni di precisione: Individuare pagine specifiche  /  con tabelle  /  forme  /  paragrafi di intestazione  / Migliora la navigazione con Scopri di più Seleziona funzionalità...

⭐ Miglioramenti delle stelle: Naviga rapidamente verso qualsiasi luogo  /  inserire automaticamente testo ripetitivo  /  passare senza problemi da una finestra all'altra del documento  /  11 strumenti di conversione...

👉 Vuoi provare queste funzionalità? Kutools per Word offre a Prova gratuita 60-day, senza limitazioni! 🚀

Scarica gratis     Scopri di più     Compra Ora