listStylePosition Property

Returns or sets a String that represents the position of the bullet in relation to where text is wrapped for each line in a list.

expression.listStylePosition

expression    Required. An expression that returns one of the objects in the Applies To list.

Remarks

The String value for the listStylePosition property can be any of the following:

Value	Description
outside	Places the bullet outside the text, and any wrapping text is not aligned under the marker.
inside	Places the bullet inside the text, and any wrapping text is aligned under the marker

Example

The following example inserts an unordered list into the active document before the currently selected element, and then specifies an image to display for the bullet, specifies that the bullet is displayed even with the wrapped lines, and then specifies that if the image file cannot be found that a circle bullet displays in its place.

    Sub SetBulletedListProperties()
    Dim objList As FPHTMLUListElement
    Dim strList As String
    
    strList = "<ul id=""newlist""><li>item1</li>" & _
        "<li>item2</li><li>item3</li><li>item4</li></ul>"
        
    ActiveDocument.activeElement.insertAdjacentHTML _
        where:="beforebegin", HTML:=strList
    
    Set objList = ActiveDocument.all.tags("ul").Item("newlist")
    
    With objList.Style
        .listStyleImage = "sqbullet.gif"
        .listStylePosition = "inside"
        .listStyleType = "circle"
    End With
End Sub