Método ListFormat.ListOutdent (Word)
Diminui o nível de lista dos parágrafos no intervalo para o objeto ListFormat especificado, em incrementos de um nível.
expression. ListOutdent
expression é obrigatório. Uma variável que representa um objeto 'ListFormat'.
Este exemplo reduz em um nível o recuo de cada parágrafo da primeira lista do documento ativo.
ActiveDocument.Lists(1).Range.ListFormat.ListOutdent
Este exemplo formata os parágrafos de quatro a oito no documento ativo como uma lista de tópicos numerados, recua os parágrafos em um nível e remove o recuo do primeiro parágrafo da lista.
Dim docActive As Document
Dim rngTemp As Range
Set docActive = ActiveDocument
Set rngTemp = _
docActive.Range( _
Start:=docActive.Paragraphs(4).Range.Start, _
End:=docActive.Paragraphs(8).Range.End)
With rngTemp.ListFormat
.ApplyOutlineNumberDefault
.ListIndent
End With
docActive.Paragraphs(4).Range.ListFormat.ListOutdent
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.