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:

  1. Wählen Sie die Liste aus, die Sie einfrieren möchten.

  2. Drücken Sie Strg + C, um den Text in die Zwischenablage zu kopieren. Die Liste sollte noch ausgewählt sein.

  3. Wählen Sie im Menü Bearbeiten die Option Inhalte einfügen. Word zeigt das Dialogfeld Inhalte einfügen an. (Siehe Abbildung 1.)

  4. Wählen Sie als Einfügetyp unformatierten Text.

  5. 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.

Klicken Sie hier, um diese spezielle Seite in einem neuen Browser-Tab zu öffnen.

WordTips ist Ihre Quelle für kostengünstige Microsoft Word-Schulungen.

(Microsoft Word ist die weltweit beliebteste Textverarbeitungssoftware.) Dieser Tipp (1857) gilt für Microsoft Word 97, 2000, 2002 und 2003. Sie finden eine Version dieses Tipps für die Multifunktionsleistenschnittstelle von Word (Word 2007) und später) hier:

Listen in Text konvertieren.