Clase ListTemplate (Word VBA)

La clase ListTemplate representa una sola plantilla de lista que incluye todo el formato que define una lista.

Set

Para usar una variable de clase ListTemplate, primero debe ser instanciado, por ejemplo

Dim lte as ListTemplate
Set lte = ActiveDocument.ListTemplates(Index:=1)

Los siguientes procedimientos se pueden usar para establecer variables de clase ListTemplate : ListFormat.ListTemplate, Convert, ListTemplates.Add, ListTemplates.Item, Style.ListTemplate, Document.ListTemplates, ListGallery.ListTemplates y Template.ListTemplates

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos ListTemplate en una colección.

Dim lte As ListTemplate
For Each lte In ActiveDocument.ListTemplates
	
Next lte

Convert

Convierte una lista de varios niveles en una lista de un solo nivel o viceversa.

No puede usar el método Convert en una plantilla de lista derivada del conjunto ListGalleries.

Sintaxis : expression.Convert (Level)

Level: Nivel que va a utilizarse para dar formato a la nueva lista.

ActiveDocument.ListTemplates(1).Convert

ListLevels

Devuelve una colección ListLevels que representa todos los niveles del ListTemplateespecificado.

Para obtener información sobre cómo devolver un solo miembro de una colección, vea devolver un objeto de una colección.

Set myListTemp = _ 
 ListGalleries(wdOutlineNumberGallery).ListTemplates(1) 
For Each mylevel In myListTemp.ListLevels 
 mylevel.LinkedStyle = "Heading " & mylevel.index 
Next mylevel

Name

Devuelve o establece el nombre del objeto especificado.

ActiveDocument.ListTemplates(1).Name =

OutlineNumbered

True si el objeto ListTemplate especificado es esquema numerado.

Si esta propiedad se establece en false , la plantilla de lista se convierte en una lista de un solo nivel que utiliza el formato del primer nivel. No se puede establecer esta propiedad para un objeto ListTemplate devuelto desde un objeto ListGallery .

Selection.Range.ListFormat.ListTemplate.OutlineNumbered = False

Parent

Devuelve un objeto Object que representa el objeto primario del objeto ListTemplate especificado.

Dim objParent As Object
Set objParent = ActiveDocument.ListTemplates(1).Parent

ListTemplates.Add

Devuelve un objeto ListTemplate que representa una nueva plantilla de lista.

No puede usar el método Add en objetos ListTemplates devueltos desde un objeto List Gallery.

Sintaxis : expression.Add (OutlineNumbered, Name)

Set myList = _ 
 ActiveDocument.ListTemplates.Add(OutlineNumbered:=False) 
myList.ListLevels(1).NumberStyle = wdListNumberStyleUpperCaseLetter 
Selection.Range.ListFormat.ApplyListTemplate ListTemplate:=myList

Arguments

Los siguientes argumentos son opcionales

OutlineNumbered (Boolean) - True para aplicar numeración de esquema a la nueva plantilla de lista.

Name (String) - Nombre opcional utilizado para vincular la plantilla de lista a un campo LISTNUM.

ListTemplates.Count

Devuelve un Long que representa el número de plantillas de lista de la colección.

Dim lngCount As Long
lngCount = ActiveDocument.ListTemplates.Count

ListTemplates.Item

Devuelve un objeto ListTemplate individual de una colección.

Sintaxis : expression.Item (Index)

Index: El objeto individual que se va a devolver.

Dim lte As ListTemplate
Set lte = ActiveDocument.ListTemplates(Index:=1)

ListTemplates.Parent

Devuelve un objeto Object que representa el objeto primario del objeto ListTemplates especificado.

Dim objParent As Object
Set objParent = ActiveDocument.ListTemplates.Parent