object. Read/write Single.
expression.TextPosition
expression Required. An expression that returns a ListLevel object.
Example
This example sets the indentation for all levels of the first outline-numbered list template. Each list level number is indented 0.5 inch (36 points) from the previous level, the tab is set at 0.25 inch (18 points) from the number, and wrapping text is indented 0.25 inch (18 points) from the number.
r = 0
For Each lev In ListGalleries(wdOutlineNumberGallery) _
.ListTemplates(1).ListLevels
lev.Alignment = wdListLevelAlignLeft
lev.NumberPosition = r
lev.TrailingCharacter = wdTrailingTab
lev.TabPosition = r + 18
lev.TextPosition = r + 18
r = r + 36
Next lev