Range.ListFormat (Word)

Gibt ein ListFormat -Objekt zurück, das alle Listenformatierungsmerkmale eines Bereichs darstellt.

Set myDoc = ActiveDocument 
Set myRange = _ 
 myDoc.Range(Start:= myDoc.Paragraphs(3).Range.Start, _ 
 End:=myDoc.Paragraphs(6).Range.End) 
myRange.ListFormat.ApplyOutlineNumberDefault