Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
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 devolver um único membro de uma coleção, veja Devolver um objeto de uma coleção.
Exemplo
Este exemplo define a variável mylsttmp para o segundo modelo de lista no separador Numeração hierárquica na caixa de diálogo Marcas 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.