Wie wählt man Nicht-Überschriftenabsätze in Word aus?
In einigen Fällen müssen Sie möglicherweise alle Nicht-Überschriftenabsätze in einem Word-Dokument auswählen. Anstatt sie einzeln auszuwählen, stellt dieses Tutorial zwei effiziente Methoden vor, um alle Nicht-Überschriftenabsätze auf einmal auszuwählen.
Nicht-Überschriftenabsätze mit Kutools für Word auswählen
Nicht-Überschriftenabsätze mit VBA auswählen
Empfohlene Produktivitätstools für Word
Kutools für Word: Integration von KI 🤖, über 100 erweiterte Funktionen sparen 50 % Ihrer Dokumentenbearbeitungszeit. Kostenlos herunterladen
Office Tab: Führt browserähnliche Tabs in Word (und anderen Office-Tools) ein und vereinfacht die Navigation zwischen mehreren Dokumenten. Kostenlos herunterladen
Nicht-Überschriftenabsätze mit Kutools für Word auswählen
Kutools für Word bietet die einfachste Möglichkeit, Nicht-Überschriftenabsätze auszuwählen. Sobald es installiert ist, können Sie die Aufgabe mit nur einem Klick abschließen.
- Klicken Sie auf Kutools > Absätze > Nicht-Überschriftenabsätze auswählen.
Hinweis: Sie können dieses Hilfsmittel auch verwenden, um alle Nicht-Überschriftenabsätze innerhalb eines ausgewählten Teils des Dokuments auszuwählen, indem Sie zuerst den Teil auswählen und dann das Hilfsmittel anwenden.
Nicht-Überschriftenabsätze mit VBA auswählen
Sie können auch VBA verwenden, um alle Nicht-Überschriftenabsätze auszuwählen. Folgen Sie den folgenden Schritten:
- Drücken Sie Alt + F11, um das Microsoft Visual Basic for Applications-Fenster zu öffnen.
- Klicken Sie auf der Registerkarte Einfügen auf Modul und kopieren Sie dann den folgenden VBA-Code in das Modulfenster.
Sub SelectNonHeadingParagraphs() Dim tempTable As Paragraph Application.ScreenUpdating = False ActiveDocument.DeleteAllEditableRanges wdEditorEveryone For Each tempTable In ActiveDocument.Paragraphs If tempTable.Style <> ActiveDocument.Styles(wdStyleHeading1) Then tempTable.Range.Editors.Add wdEditorEveryone End If Next ActiveDocument.SelectAllEditableRanges wdEditorEveryone ActiveDocument.DeleteAllEditableRanges wdEditorEveryone Application.ScreenUpdating = True End Sub
- Klicken Sie auf Ausführen
um den Code auszuführen.
Hinweis: Diese Methode verwendet Überschrift 1 als Beispiel. Sie können sie durch andere Überschriftenstile ersetzen. Wenn Ihr Dokument mehrere Überschriftenstile enthält, ist diese Methode möglicherweise nicht geeignet.
Office Tab: Führt tabbed Interfaces in Word, Excel, PowerPoint... ein![]() |
Verbessern Sie jetzt Ihren Arbeitsablauf.Mehr über Office Tab erfahren Kostenlos herunterladen |
Die besten Produktivitätstools für das Büro
Kutools für Word – Steigern Sie Ihr Word-Erlebnis mit über 100 bemerkenswerten Funktionen!
🤖 Kutools AI-Features: KI-Assistent / Echtzeit-Assistent / Super Polieren (Format beibehalten) / Super Übersetzen (Format beibehalten) / KI-Redaktion / KI Korrekturlesen...
📘 Dokumenten-Beherrschung: Seiten teilen / Dokumente zusammenführen / Auswahl in verschiedenen Formaten exportieren (PDF/TXT/DOC/HTML...) / Stapelweise Konvertierung nach PDF...
✏ Inhaltsbearbeitung: Stapelweise Suchen und Ersetzen über mehrere Dateien / Alle Bilder skalieren / Tabellenzeilen und -spalten transponieren / Tabelle in Text umwandeln...
🧹 Mühelos bereinigen: Entfernen Sie ganz einfach zusätzliche Leerzeichen / Abschnittsumbrüche / Textfelder / Hyperlinks / Weitere Entfernen-Werkzeuge finden Sie in der Gruppe Entfernen...
➕ Kreative Einfügungen: Tausendertrennzeichen einfügen / Kontrollkästchen / Optionsfelder / QR-Code / Barcode / Mehrere Bilder / Entdecken Sie weitere Funktionen im Bereich Einfügen...
🔍 Präzise Auswahl: Bestimmen Sie gezielt bestimmte Seiten / Tabellen / Formen / Überschriftenabsätze / Verbessern Sie die Navigation mit weiteren Auswählen -Funktionen...
⭐ Herausragende Verbesserungen: Navigieren Sie zu beliebigen Standorten / Automatisches Einfügen von wiederkehrendem Text / Umschalten zwischen Dokument-Fenstern /11 Konvertierungswerkzeuge...
🌍 Unterstützt über40 Sprachen: Nutzen Sie Kutools in Ihrer bevorzugten Sprache – unterstützt Englisch, Spanisch, Deutsch, Französisch, Chinesisch und mehr als40 weitere!

Die besten Produktivitätstools für das Büro
Kutools für Word – 100+ Werkzeuge für Word
- 🤖 Kutools AI-Features: KI-Assistent / Echtzeit-Assistent / Super Polieren / Super Übersetzen / KI-Redaktion / KI Korrekturlesen
- 📘 Dokumenten-Beherrschung: Seiten teilen / Dokumente zusammenführen / Stapelweise Konvertierung nach PDF
- ✏ Inhaltsbearbeitung: Stapelweise Suchen und Ersetzen / Alle Bilder skalieren
- 🧹 Mühelos bereinigen: Zusätzliche Leerzeichen entfernen / Abschnittsumbrüche entfernen
- ➕ Kreative Einfügungen: Tausendertrennzeichen einfügen / Kontrollkästchen einfügen / QR-Codes erstellen
- 🌍 Unterstützt über40 Sprachen: Kutools spricht Ihre Sprache – mehr als40 Sprachen werden unterstützt!