Classe ListTemplates (Word VBA)

Uma coleção de objetos ListTemplate em um documento, uma galeria de listas ou um modelo. Para usar uma variável de classe ListTemplates, ela primeiro precisa ser instanciada por exemplo

Dim lts as ListTemplates
Set lts = ActiveDocument.ListTemplates

For Each

Aqui está um exemplo de processamento dos itens ListTemplates em uma coleção.

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

Add

Retorna um objeto ListTemplate que representa um novo modelo de lista.

Você não pode usar o método Add em objetos de ListTemplates retornados de um objeto de ListGallery. No entanto, você pode modificar os modelos de lista existentes nas galerias.

Add (OutlineNumbered, Name)

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

Arguments

Optional arguments

Os seguintes argumentos são opcionais

OutlineNumbered (Boolean) - True para aplicar numeração para o novo modelo de lista.

Name (String) - Um nome opcional usado para vinculação do modelo de lista a um campo LISTNUM. Você pode usar esse nome para o modelo de lista na coleção de índice.

Count

Retorna um Long que representa o número de modelos de lista na coleção. Somente leitura.

Dim lngCount As Long
lngCount = ActiveDocument.ListTemplates.Count

Item

Retorna um objeto ListTemplate individual em uma coleção.

Item (Index)

Index: O objeto individual a ser retornado. Pode ser um Long que indica a posição ordinal ou uma cadeia de caracteres que representa o nome do objeto individual.

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