ListOutdent Method Example

This example reduces the indent of each paragraph in first list in the active document by one level.

ActiveDocument.Lists(1).Range.ListFormat.ListOutdent

This example formats paragraphs four through eight in MyDoc.doc as an outline-numbered list, indents the paragraphs one level, and then removes the indent from the first paragraph in the list.

Set myDoc = Documents("MyDoc.doc")
Set myRange = _
    myDoc.Range(Start:= myDoc.Paragraphs(4).Range.Start, _
    End:=myDoc.Paragraphs(8).Range.End)
With myrange.ListFormat
    .ApplyOutlineNumberDefault
    .ListIndent
End With
myDoc.Paragraphs(4).Range.ListFormat.ListOutdent