Klasse ListTemplates (Word VBA)
Eine Auflistung von ListTemplate -Objekten in einem Dokument, einem Listenkatalog oder einer Vorlage. Um eine ListTemplates -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise
Dim lts as ListTemplates
Set lts = ActiveDocument.ListTemplates
For Each
Hier ist ein Beispiel für die Verarbeitung der ListTemplates -Elemente in einer Sammlung
Dim lte As ListTemplate
For Each lte In ActiveDocument.ListTemplates
Next lte
Add
Gibt ein ListTemplate -Objekt zurück, das eine neue Listenvorlage darstellt.
Sie können die Add-Methode nicht für ListTemplates-Objekte verwenden, die von einem ListGallery-Objekt zurückgegeben wurden.
Add (OutlineNumbered, Name)
Set myList = _
ActiveDocument.ListTemplates.Add(OutlineNumbered:=False)
myList.ListLevels(1).NumberStyle = wdListNumberStyleUpperCaseLetter
Selection.Range.ListFormat.ApplyListTemplate ListTemplate:=myList
Arguments
Optional arguments
Die folgenden Argumente sind optional
OutlineNumbered (Boolean) - True, wenn auf die neue Listenvorlage eine Gliederungsnummerierung angewendet werden soll.
Name (String) - Ein optionaler Name, der verwendet wird, um die Listenvorlage mit einem LISTNUM-Feld zu verknüpfen.
Count
Gibt einen Wert vom Typ Long zurück, der die Anzahl der Listenvorlagen in der Auflistung darstellt.
Dim lngCount As Long
lngCount = ActiveDocument.ListTemplates.Count
Item
Gibt ein einzelnes ListTemplate -Objekt in einer Auflistung zurück.
Item (Index)
Index: Das einzelne Objekt zurückgegeben werden soll.
Dim lte As ListTemplate
Set lte = ActiveDocument.ListTemplates(Index:=1)