Range.SetListLevel (Word)

Legt die Listenebenen für mindestens ein Element in einer Liste fest.

SetListLevel (Level)

Level: Eine Zahl, die die neue Listenebene angibt.

Dim iLevel As Integer: iLevel =  
ActiveDocument.Range.SetListLevel Level:=iLevel