WordBASIC- und VBA-Befehle: Aufzählungen und Numerierung

In diesem Verzeichnis finden Sie alle WordBasic-Anweisungen und -Funktionen, und zwar nach Kategorien angeordnet. Zusätzlich sind die entsprechenden VBA-Befehle neben dem WordBasic-Befehl angegeben. Das Verzeichnis stellt in erster Linie ein Nachschlagewerk dar, daß Ihnen den Umstieg von WordBasic nach Visual Basic for Applications erleichtern soll. Sie sollten für neue Programme nur die VBA-Befehle verwenden, da diese in Zukunft nur noch unterstützt werden. Viele WordBasic-Befehle wurden zu einem VBA-Befehl zusammengefaßt, deshalb werden Sie häufig für unterschiedliche WordBasic-Befehle den gleichen VBA-Befehl finden.

Aufzählungen und Numerierung

WordBasic-BefehlVBA-BefehlFunktion
AufzählungNumerierungEntfernenSelection.Range.ListFormat.RemoveNumbersEntfernen der Aufzählungs- und Numerierungszeichen.
ExtrasAufzählungStandardSelection.Range.ListFormat.ApplyBulletDefaultDie markierten Absätze werden mit Aufzählungszeichen und Tab-Stops, sowie mit einem hängenden Einzug versehen.
ExtrasNumerierungAufzählungenWith ListGalleries(wdNumberGallery).ListTemplates(1). ListLevels(1)     .NumberFormat = „%1.“     .TrailingCharacter = WdTrailingCharacter .NumberStyle =WdListNumberStyle .Alignment = WdListLevelAlignment .TextPosition = InchesToPoints(num)     .TabPosition = InchesToPoints(num)     .ResetOnHigher = True     .StartAt =num .Font.Size = num End With

Selection.Range.ListFormat.ApplyListTemplate ListTemplate:=ListGalleries(wdNumberGallery). ListTemplates(1)

Die Formatierung von Absätzen wird festgelegt.
ExtrasNumerierungStandardSelection.Range.ListFormat.ApplyNumberDefaultDie markierten Absätze werden nach dem eingestellten Standard formatiert.
FormatAufzählungWith ListGalleries(wdBulletGallery).ListTemplates(1).ListLevels(1)    .NumberFormat = ChrW(num)     .NumberStyle = wdListNumberStyleBullet     .NumberPosition = num .Alignment = WdListLevelAlignment .TextPosition = num .TabPosition = num With .Font         .Size = num .Name = text .ColorIndex = WdColorIndex End With End WithDer markierte Abschnitt wird mit Aufzählungszeichen versehen.
FormatAufzählungStandardSelection.Range.ListFormat.ApplyBulletDefault

Selection.Range.ListFormat.RemoveNumbers

Hinzufügen oder Entfernen von Aufzählungszeichen eines markierten Absatzes.
FormatAufzählungStandard()Selection.Range.ListFormat.ApplyBulletDefault

Selection.Range.ListFormat.RemoveNumbers

Stellt fest, ob die markierten Absätze Aufzählungszeichen enthalten oder ob sie nummeriet sind.
FormatAufzählungUndNumerierungSelection.Range.ListFormat.ApplyListTemplate ListTemplate:=ListGalleries(WdListGalleryType). ListTemplates(num)

Selection.Range.ListFormat.RemoveNumbers

Absätze werden mit Aufzählungs- oder Numerierungszeichen versehen oder diese werden entfernt.
FormatFVDefNumWith ActiveDocument.Styles(name). ListGalleries(WdListGalleryType).ListTemplates(num). ListLevels(num)

.NumberFormat = „%1)“

.TrailingCharacter = wdTrailingTab

.NumberStyle = wdListNumberStyleArabic

End With

Festlegen der Zahlenformate für eine Dokumentvorlage.
FormatGegliederteListeSet atemp = ListGalleries(wdOutlineNumberGallery).ListTemplates(num)

atemp.ListLevels(1).NumberStyle = wdListNumberStyleLowercaseLetter

Selection.Range.ListFormat.ApplyListTemplate ListTemplate:=atemp

Ähnlich einer Gliedrung werden die markierten Absätze in Ebenen numeriert.
FormatNumerierungSet atemp = ListGalleries(wdNumberGallery).ListTemplates(num)

With atemp.ListLevels(1)

.NumberFormat = „%1.“

.TrailingCharacter = wdTrailingTab

.NumberStyle = wdListNumberStyleArabic

End With

Selection.Range.ListFormat.ApplyListTemplate ListTemplate:=atemp

Die markierten Absätze werden numeriert.
FormatNummerStandardSelection.Range.ListFormat.ApplyNumberDefault

Selection.Range.ListFormat.RemoveNumbers

Die markierten Absätze werden numeriert oder die Numerierung wird entfernt.
FormatNummerStandard()Selection.Range.ListFormat.ApplyNumberDefault

Selection.Range.ListFormat.RemoveNumbers

Ermittelt den Status der Numerierung.
HöherstufenListeSelection.Range.ListFormat.ListIndentHöherstufen der marikeirten Absätze in einer Liste.
NumerierungÜberspringenSelection.Range.ListFormat.RemoveNumbersAusschließen der markierten Absätze von Aufzählungs- und Numerierungslisten.
NumerierungÜberspringen()Selection.Range.ListFormat.RemoveNumbersFeststellen, ob Aufzählungs- oder Numerierungszeichen der markierten Absätze in der Liste erscheinen.
TieferstufenListeSelection.Range.ListFormat.ListOutdentTieferstufen der marikeirten Absätze in einer Liste.