Konvertieren von Listen in Text (Microsoft Word)
Wenn Sie die nummerierte Listenfunktion von Word verwendet haben, haben Sie wahrscheinlich bemerkt, dass die Nummern am Anfang jedes Listenelements nicht ausgewählt werden können.
Wenn Sie Elemente in Ihrer Liste löschen oder hinzufügen, werden die anderen Elemente in der Liste neu nummeriert, um Ihre Aktionen zu kompensieren.
In den meisten Fällen erwarten und möchten Sie genau, dass Ihre nummerierten Listen funktionieren. Es kann jedoch vorkommen, dass die Listen „eingefroren“ werden sollen, was bedeutet, dass sich die Zahlen nicht ändern. In diesen Fällen kann die automatische Nummerierungsfunktion eher frustrierend als nett erscheinen.
Es gibt zwei Möglichkeiten, um dieses Problem zu umgehen. Die erste, die ich als Brute-Force-Methode bezeichne, beinhaltet ein wenig Ausschneiden und Einfügen. Sie müssen lediglich die folgenden allgemeinen Schritte ausführen:
-
Wählen Sie die Liste aus, die Sie einfrieren möchten.
-
Drücken Sie Strg + C, um den Text in die Zwischenablage zu kopieren. Die Liste sollte noch ausgewählt sein.
-
Zeigen Sie die Registerkarte Home des Menübands an.
-
Klicken Sie auf den Abwärtspfeil unter dem Einfügewerkzeug in der Gruppe Zwischenablage des Menübands und wählen Sie dann Inhalte einfügen. Word zeigt das Dialogfeld Inhalte einfügen an. (Siehe Abbildung 1.)
-
Wählen Sie als Einfügetyp unformatierten Text.
-
Klicken Sie auf OK.
Diese Aktionen ersetzen die vorhandene dynamische Liste durch den eigenen Text, und Word konvertiert die automatische Nummerierung automatisch in Text.
Dies hat natürlich verschiedene Nachteile. Zunächst verlieren Sie alle anderen speziellen Formatierungen, die Sie möglicherweise in den Listenelementen haben. Wenn einige Wörter anders formatiert sind als die Standardwerte für Absätze (z. B. fett oder kursiv), werden diese entfernt und müssen manuell wiederholt werden.
Ein einfacherer Ansatz ist die Verwendung eines Makros, um die Arbeit für Sie zu erledigen. VBA enthält eine spezielle Methode, die die bereits erwähnten Nachteile beseitigt und die Konvertierung viel sauberer macht. Keine Ihrer anderen Formatierungen außer den automatischen Listennummern ist betroffen. Das folgende ist das ListPlain-Makro:
Sub ListPlain() Dim lp As Paragraph For Each lp In ActiveDocument.ListParagraphs lp.Range.ListFormat.ConvertNumbersToText Next lp End Sub
Beachten Sie, wie kurz das Makro ist. Es läuft auch sehr schnell und wirkt sich auf alle Nummerierungen im gesamten Dokument aus. Alle nummerierten Listen, die auf der automatischen Nummerierung von Word basieren, sind ebenso betroffen wie alle LISTNUM-Felder.
_Hinweis: _
Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der WordTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.
WordTips ist Ihre Quelle für kostengünstige Microsoft Word-Schulungen.
(Microsoft Word ist die weltweit beliebteste Textverarbeitungssoftware.) Dieser Tipp (11072) gilt für Microsoft Word 2007, 2010, 2013, 2016, 2019 und Word in Office 365. Eine Version dieses Tipps finden Sie für ältere Menüoberfläche von Word hier: