NumberStyle Property Example

This example creates an alternating number style for the third outline-numbered list template.

Set myTemp = ListGalleries(wdOutlineNumberGallery).ListTemplates(3)
For i = 1 to 9
    If i Mod 2 = 0 Then
        myTemp.ListLevels(i).NumberStyle = _
            wdListNumberStyleUppercaseRoman
    Else 
        myTemp.ListLevels(i).NumberStyle = _
            wdListNumberStyleLowercaseRoman
    End If
Next i

This example changes the number style to uppercase letters for every outline-numbered list in the active document.

For Each lt In ActiveDocument.ListTemplates
    For Each ll In lt.listlevels
       ll.NumberStyle = wdListNumberStyleUppercaseLetter
    Next ll
Next lt

This example inserts a Figure caption at the insertion point. The caption letter is formatted as an uppercase letter.

CaptionLabels(wdCaptionFigure).NumberStyle = _
    wdCaptionNumberStyleUppercaseLetter
Selection.Collapse Direction:=wdCollapseEnd
Selection.InsertCaption Label:="Figure"

This example sets the formatting for footnotes and endnotes in the active document.

With ActiveDocument
    .Footnotes.NumberStyle = wdNoteNumberStyleLowercaseRoman
    .Endnotes.NumberStyle = wdNoteNumberStyleUppercaseRoman
End With

This example formats the page numbers in the active document's footer as lowercase roman numerals.

For Each sec In ActiveDocument.Sections
    sec.Footers(wdHeaderFooterPrimary).PageNumbers _
        .NumberStyle = wdPageNumberStyleLowercaseRoman
Next sec