Propriedade Application.ListGalleries (Word)
Retorna uma coleção ListGalleries que representa as galerias de modelo de lista de três. .
Sintaxe
expression. ListGalleries
expressão Uma variável que representa um Aplicativo objeto.
Comentários
Cada modelo de galeria (Com Marcadores, Numerada e de Vários Níveis) corresponde a uma guia na caixa de diálogo Marcadores e Numeração (menu Formatar). Para obter informações sobre como retornar um único membro de uma coleção, consulte Retornando um objeto de uma coleção.
Exemplo
Este exemplo define a variável mylsttmp como o segundo modelo de lista na guia Numeração de Contorno na caixa de diálogo Balas e Numeração . Em seguida, o exemplo aplica o modelo à primeira lista no documento ativo.
Set mylsttmp = _
ListGalleries(wdOutlineNumberGallery).ListTemplates(2)
ActiveDocument.Lists(1).ApplyListTemplate ListTemplate:=mylsttmp
Este exemplo percorre a coleção ListGalleries e altera os modelos de cada Galeria de modelos de lista de volta para o modelo interno.
For Each listgal In ListGalleries
For i = 1 To 7
listgal.Reset(i)
Next i
Next listgal
Confira também
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.