Propriedade ListLevel.NumberStyle (Word)
Retorna ou define o estilo de número para o objeto ListLevel. Leitura/gravação WdListNumberStyle.
Sintaxe
expression. NumberStyle
expression é obrigatório. Uma variável que representa um objeto 'ListLevel'.
Comentários
Algumas das constantes WdListNumberStyle podem não estar disponíveis para você, dependendo do suporte a idioma (inglês americano, por exemplo) que você selecionou ou instalou.
Exemplo
Este exemplo cria um estilo de número alternativo para o terceiro modelo de lista de vários níveis.
Set myTemp = ListGalleries(wdOutlineNumberGallery).ListTemplates(3)
For i = 1 to 9
If i Mod 2 = 0 Then
myTemp.ListLevels(i).NumberStyle = _
wdListNumberStyleUppercaseRoman
Else
myTemp.ListLevels(i).NumberStyle = _
wdListNumberStyleLowercaseRoman
End If
Next i
Este exemplo altera o estilo de número para letras maiúsculas em cada lista de vários níveis no documento ativo.
For Each lt In ActiveDocument.ListTemplates
For Each ll In lt.listlevels
ll.NumberStyle = wdListNumberStyleUppercaseLetter
Next ll
Next lt
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.