Método ListFormat.ApplyOutlineNumberDefault (Word)
Adiciona o esquema padrão de numeração de tópicos aos parágrafos do intervalo do objeto ListFormat especificado.
Sintaxe
expression. ApplyOutlineNumberDefault
( _DefaultListBehavior_
)
expressão Obrigatório. Uma variável que representa um objeto 'ListFormat'.
Parâmetros
Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
---|---|---|---|
DefaultListBehavior | Opcional | Variant | Define um valor que especifica se o Microsoft Word usa nova formatação orientada pela Web para uma melhor exibição de lista. Pode ser uma das seguintes constantes: wdWord8ListBehavior (usar formatação compatível com o Microsoft Word 97) ou wdWord9ListBehavior (usar orientada pela Web formatação). Por motivos de compatibilidade, a constante padrão é wdWord8ListBehavior, mas em novos procedimentos, que você deve usar wdWord9ListBehavior para aproveitar melhor orientada pela Web formatação em relação ao recuo e vários níveis de lista. |
Comentários
Se os parágrafos já estiverem formatados como uma lista de tópicos numerados, esse método removerá os números e a formatação. Esse método não remove estilos de título internos que tenham sido aplicados aos parágrafos.
Exemplo
Este exemplo adiciona numeração de tópicos aos parágrafos da seleção. Se a seleção já for uma lista de tópicos numerados, o exemplo removerá os números e a formatação.
Selection.Range.ListFormat.ApplyOutlineNumberDefault
Este exemplo define a variável myRange para incluir os parágrafos de três a seis do documento ativo e verifica se o intervalo contém formatação de lista. Se não existir formatação de lista, o formato de lista de tópicos numerados padrão será aplicado.
Set myDoc = ActiveDocument
Set myRange = myDoc.Range( _
Start:= myDoc.Paragraphs(3).Range.Start, _
End:=myDoc.Paragraphs(6).Range.End)
If myRange.ListFormat.ListType = wdListNoNumbering Then
myRange.ListFormat.ApplyOutlineNumberDefault
End If
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.