Hur hittar jag och ersätter flera ord samtidigt i ett Word-dokument?

Word erbjuder en Sök och ersätt-funktion för att hitta alla instanser av ett ord eller en fras och ersätta dem med ett nytt ord samtidigt. Men om du vill hitta och ersätta olika ord samtidigt kan den här inbyggnadsfunktionen inte hjälpa. I den här artikeln pratar vi om en VBA-metod för att hitta och ersätta flera olika ord samtidigt i Word-dokument.

Hitta och ersätt flera ord samtidigt i Word med VBA-kod
Hitta och ersätt enkelt flera ord samtidigt i Word med en fantastisk funktion

Hitta och ersätt flera ord samtidigt i Word med VBA-kod

Gör så här för att hitta och ersätta flera ord samtidigt i ett Word-dokument.

1. Öppna Word-dokumentet du vill hitta och ersätt flera ord samtidigt och tryck sedan på andra + F11 nycklar för att öppna Microsoft Visual Basic för applikationer fönster.

2. I Microsoft Visual Basic för applikationer fönstret klickar Insert > Modul. Kopiera sedan VBA-koden nedan till modulfönstret.

VBA-kod: Hitta och ersätt flera ord samtidigt i 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. tryck på F5 för att köra koden.

4. I den första Kutools for Word dialogrutan, ange flera ord som du hittar och ersätt i textrutan och separera dem med komma och klicka sedan på OK knapp. Se skärmdump:

5. På sekunden Kutools for Word dialogrutan, ange de nya orden du ska ersätta med (dessa ord måste också separeras med kommatecken) och klicka sedan på OK knapp.

Notera: I det här fallet, alla "KTE" i detta dokument kommer att ersättas med "Ny", och "KTO" och "KTW" kommer att ersättas med "Testa" och "Avsluta". Ändra dem efter dina behov.

Hitta och ersätt enkelt flera ord samtidigt i Word med en fantastisk funktion

1. Starta Microsoft Word-applikationen, klicka på Kutools Plus > Batch Hitta och ersätt.

2. I Batch Hitta och ersätt konfigurera på följande sätt.

• 2.1 klicka på knapp> Lägg till fil or lägg till mapp för att lägga till ett eller flera dokument där du hittar och ersätter flera ord.
  
• 2.2 Klicka på Lägg till rad -knappen för att infoga sök- och ersättningsfälten. Skapa tre rader om du vill hitta och ersätta tre olika texter samtidigt.
• 2.3 I varje rad anger du de befintliga orden som du kommer att ersätta med en ny i hitta och ange sedan de nya orden i ersätta kolonn.
• 2.4 Ange Söktyp för varje rad.
• 2.5 I Hitta i välj var du ska söka och ersätta. Det inkluderar Huvuddokument, Sidhuvud och Sidfot i denna avdelning. Du kan välja en av dem, två av dem eller alla baserat på dina behov.
• 2.6. Klicka på ersätta för att starta operationen. Se skärmdump:

Sedan ersätts de specifika orden samtidigt i valda dokument.

Dricks: Du kan markera resultatet med bakgrundsfärg genom att ange viss färg i Markera kolumn för en rad.

  Om du vill ha en gratis provperiod (60 dagar) av det här verktyget, klicka för att ladda ner den, och gå sedan till för att tillämpa operationen enligt ovanstående steg.

---

Rekommenderade Word-produktivitetsverktyg

 

Kutools For Word - Mer än 100 avancerade funktioner för Word, spara 50 % tid

• Komplicerade och upprepade operationer kan göras engångsbehandling på några sekunder.
• Infoga flera bilder över mappar i Word-dokumentet samtidigt.
• Slå ihop och kombinera flera Word-filer över mappar till en med önskad ordning.
• Dela upp det aktuella dokumentet i separata dokument enligt rubrik, avsnittbrytning eller andra kriterier.
• Konvertera filer mellan Doc och Docx, Docx och PDF, samling verktyg för vanliga konverteringar och val, och så vidare ...

Läs mer Hämta hem nu Inköp