KutoolsforOffice — Eine Lösung, fünf leistungsstarke Tools.Mehr erreichen mit weniger Aufwand.März-Aktion: 20 % Rabatt

Wie kann man mehrere Wörter gleichzeitig in einem Word-Dokument suchen und ersetzen?

AutorSiluvia Änderungsdatum

Das Suchen und Ersetzen von Wörtern in einem Word-Dokument ist eine häufige Aufgabe – besonders dann, wenn konsistente Änderungen in langen Dokumenten erforderlich sind. Müssen Sie jedoch mehrere Begriffe gleichzeitig suchen und ersetzen, wird das manuelle Vorgehen schnell zeitaufwendig. Zum Glück gibt es effiziente Methoden, um diese Aufgabe deutlich zu beschleunigen.

In diesem Tutorial zeigen wir Ihnen, wie Sie mehrere Wörter gleichzeitig in einem Word-Dokument mit zwei Methoden Suchen und Ersetzen:

Suchen und Ersetzen mehrere Wörter gleichzeitig in Word mit VBA
Mehrere Wörter gleichzeitig in Word mühelos mit einer beeindruckenden Funktion Suchen und Ersetzen


Suchen und Ersetzen mehrere Wörter gleichzeitig in Word mit VBA

Sie können VBA-Code nutzen, um mehrere Wörter gleichzeitig in einem Word-Dokument zu suchen und zu ersetzen. Gehen Sie dazu wie folgt vor:

  1. Öffnen Sie das Word-Dokument, in dem Sie mehrere Wörter suchen und ersetzen möchten, und drücken Sie dann Alt + F11, um das Fenster Microsoft Visual Basic for Applications zu öffnen.
  2. Klicken Sie im Fenster Microsoft Visual Basic for Applicationsauf Einfügen>Modul. Kopieren Sie anschließend den folgenden VBA-Code in das Modul-Fenster:
    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, separated by comma: ", "Kutools for Word")
        xReplace = InputBox("Enter new items here, separated 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. Drücken Sie F5, um den Code auszuführen.
  4. Geben Sie im ersten Dialogfeld Kutools für Worddie mehreren Wörter, die Sie Suchen und Ersetzen möchten, durch Kommas getrennt ein und klicken Sie dann auf OK.

    Geben Sie die zu ersetzenden Einträge in diesem Dialog ein

  5. Geben Sie im zweiten Dialogfeld Kutools für Worddie Ersatzwörter ebenfalls durch Kommas getrennt ein und klicken Sie dann auf OK.

    Geben Sie neue Einträge zur Verwendung in diesem Dialog ein

Hinweis: In diesem Beispiel werden „KTE“ durch „New“, „KTO“ durch „Test“ und „KTW“ durch „Finish“ ersetzt. Passen Sie diese Angaben entsprechend Ihren Anforderungen an.


Mehrere Wörter gleichzeitig in Word mühelos mit einer beeindruckenden Funktion Suchen und Ersetzen

Die Funktion Stapelweise Suchen und Ersetzen von Kutools für Word ist ein leistungsstarkes Werkzeug, das das gleichzeitige Suchen und Ersetzen mehrerer Texte in einem oder mehreren Dokumenten erheblich vereinfacht. Im Gegensatz zur Standardfunktion von Word ermöglicht sie eine Batch-Verarbeitung von Ersetzungen – effizienter, schneller und mit deutlich weniger Aufwand.

Kutools für Word

Kutools für Word unterstützt Sie dabei, alltägliche Dokumentaufgaben mithilfe praktischer Werkzeuge direkt in Microsoft Word schneller zu erledigen – ganz ohne Programmierkenntnisse und komplizierte Einrichtung.

  • KI-gestütztes Schreiben, Überarbeiten, Übersetzen und Zusammenfassen
  • Stapelweise Suchen und Ersetzen über mehrere Dokumente hinweg
  • Word-Dokumente einfach zusammenführen und aufteilen
  • Stapelweise Konvertierung zwischen Word und PDF

Führen Sie die folgenden Schritte zur Durchführung von Stapelweise Suchen und Ersetzen aus:

  1. Starten Sie Microsoft Word und klicken Sie dann auf Kutools>Stapelersetzung.

    Option für die Stapelersetzung auf der Kutools-Registerkarte im Menüband

  2. Konfigurieren Sie im Fenster Stapelweise Suchen und Ersetzendie Einstellungen wie folgt:
    1. Klicken Sie auf die Schaltfläche Zeile hinzufügen, um Suchen-und-Ersetzen-Felder einzufügen. Wenn Sie beispielsweise drei verschiedene Texte ersetzen möchten, erstellen Sie einfach drei Zeilen.
    2. Geben Sie in jeder Zeile den zu ersetzenden Text in die Spalte Suchenund das Neuer Text in die Spalte Ersetzenein.
      Tipp:Sie können für jede Suchen-und-Ersetzen-Regel zusätzlich Suchtyp, den Suchbereich, die Hervorhebungsfarbe und das Format festlegen, wie durch die orangefarbenen Hervorhebungen im folgenden Screenshot dargestellt.
    3. Klicken Sie auf die Schaltfläche Schaltfläche „Hinzufügen“ und wählen Sie Datei hinzufügen oder Ordner hinzufügen, um ein oder mehrere Dokumente auszuwählen, in denen Sie die Suchen-und-Ersetzen-Operation durchführen möchten.
    4. Klicken Sie auf die Schaltfläche Ersetzen, um die Operation auszuführen.

      Fenster für die stapelweise Suche und Ersetzung

Nach Abschluss werden die angegebenen Wörter in allen ausgewählten Dokumenten gleichzeitig ersetzt.

Suchen Sie nach einer schnelleren Möglichkeit, ähnliche Aufgaben in Word zu erledigen? Probieren Sie Kutools für Word aus und vereinfachen Sie Ihre tägliche Arbeit!

Beste Office-Produktivitätswerkzeuge

Kutools für Word – Verbessern Sie Ihr Word-Erlebnis mit über 100 bemerkenswerten Funktionen!

🤖KUTOOLS KI-Funktionen: KI-Assistent / Echtzeit-Assistent / Super Polieren (Format beibehalten) / Super Übersetzen (Format beibehalten) / KI-Redaktion / KI-Korrekturlesen

📘Dokument-Meisterschaft: Seiten aufteilen, Dokumente zusammenführen, Auswahl in verschiedenen Formaten exportieren (PDF/TXT/DOC/HTML …), stapelweise in PDF konvertieren

Inhaltsbearbeitung: Stapelweises Suchen und Ersetzen in mehreren Dateien / Alle Bilder skalieren / Tabelle transponieren – Zeilen und Spalten tauschen / Tabelle in Text umwandeln

🧹Mühelose Bereinigung: Fegen Sie überflüssige Leerzeichen/Abschnittsumbruch/Textfeld/Hyperlinks/ Weitere Entfernungs-Werkzeuge finden Sie in der EntfernenGruppe …

Kreative Einfügungen: Fügen Sie Tausendertrennzeichen/Kontrollkästchen/Optionsfeld/QR-Code/Strichcode/Mehrere Bilder/ Weitere Funktionen finden Sie in der Einfügen-Gruppe …

🔍Präzisionsauswahl: Wählen Sie gezielt bestimmte Seiten, Tabellen, Formen oder Überschriftenabsätze aus – und verbessern Sie Ihre Navigation mit weiteren Auswählen-Funktionen

Hervorragende Erweiterungen: Zu beliebigen Positionen navigieren / Wiederkehrenden Text automatisch einfügen / Zwischen Dokumentenfenstern wechseln / 11 Konvertierungswerkzeuge Konvertierungs-

🌍Unterstützt über 40 Sprachen: Nutzen Sie Kutools in Ihrer bevorzugten Sprache – mit Unterstützung für Englisch, Spanisch, Deutsch, Französisch, Chinesisch und über 40 weitere!

Kutools for Word Registerkarten im Menüband
 
 

Office Tab– Bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher

  • Aktivieren Sie die tabbasierte Bearbeitung und das Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Tabs desselben Fensters – statt in separaten Fenstern.
  • Steigert Ihre Produktivität um 50 % und spart Ihnen täglich Hunderte von Mausklicks!

✨ Kutools for Office – Eine Installation, fünf leistungsstarke Werkzeuge!

Enthält Office Tab Pro·Kutools für Excel·Kutools für Outlook·Kutools für Word·Kutools for PowerPoint

📦 Alle 5 Werkzeuge in einem Paket erhalten | 🔗 Nahtlose Integration in Microsoft Office | ⚡ Zeit sparen und sofort die Produktivität steigern

Beste Office-Produktivitätswerkzeuge

Kutools für Word– 100+-Werkzeuge für Word