Objeto ListTemplates (Word)
Uma coleção de objetos ListTemplate em um documento, galeria de listas ou modelo.
Comentários
Use a propriedade ListTemplates com um objeto Document, ListGallery ou Template para retornar uma coleção ListTemplates . Com um objeto ListGallery, a coleção ListTemplates é os sete formatos de lista para listas com marcadores, listas numeradas e listas numeradas de contorno.
O exemplo a seguir exibe uma mensagem com o status de nível (único ou vários níveis) para cada modelo de lista no documento ativo.
For Each lt In ActiveDocument.ListTemplates
MsgBox "This is a multiple-level list template - " _
& lt.OutlineNumbered
Next lt
Use o método Add para adicionar um modelo de lista à coleção no modelo ou documento especificado. O exemplo a seguir adiciona um novo modelo de lista ao documento ativo e aplica à seleção.
Set myLT = ActiveDocument.ListTemplates.Add
Selection.Range.ListFormat.ApplyListTemplate ListTemplate:=myLT
Use ListTemplates (Index), em que Index é o nome de um modelo de lista ou um número de índice, para retornar um modelo de lista único em um documento ou modelo. O exemplo a seguir define uma variável de objeto igual a um modelo de lista chamado "ListBullets" no documento ativo e formata a seleção como o primeiro nível desse modelo de lista.
Set mylt = ActiveDocument.ListTemplates("ListBullets")
Selection.Range.ListFormat.ApplyListTemplateWithLevel ListTemplate:=mylt, ApplyLevel:=1
Use ListTemplates (Index), em que Index é um número de 1 a 7, para retornar um modelo de lista única em uma galeria de listas. O exemplo a seguir define uma variável de objeto igual ao primeiro modelo de lista na galeria de listas de balas e, em seguida, aplica esse modelo de lista à seleção.
Set mylt = ListGalleries(wdBulletGallery).ListTemplates(1)
Selection.Range.ListFormat.ApplyListTemplate ListTemplate:=mylt
Observação
Algumas propriedades e métodos – Converter e Adicionar, por exemplo – não funcionarão com os modelos de lista em uma galeria de listas. Você pode modificar esses modelos de lista, mas não pode alterar o tipo de galeria de listas (wdBulletGallery, wdNumberGallery ou wdOutlineNumberGallery).
Para ver se um modelo de lista em uma galeria de listas contém a formatação interna no Word, use a propriedade Modificada com o objeto ListGallery . Para redefinir a formatação para o formato de lista original, use o método Reset para o objeto ListGallery .
Após ter retornado um objeto ListTemplate, use ListLevels (Index), onde Index é um número de 1 a 9, para retornar um único objeto ListLevel. Com um objeto ListLevel, você tem acesso a todas as propriedades de formatação para o nível de lista especificado, como Alignment, Font, NumberFormat, NumberPosition, NumberStyle e TrailingCharacter.
Use o método Convert para converter um modelo de lista de vários níveis em um modelo de nível único.
Confira também
Referência do modelo de objeto do Word
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.