OutlineNumbered Property

Microsoft Word Visual Basic

object is outline numbered. Read/write Boolean.

expression.OutlineNumbered

expression    Required. An expression that returns a ListTemplate object.

Remarks

Setting this property to False converts the list template to a single-level list that uses the formatting of the first level.

You cannot set this property for a ListTemplate object returned from a ListGallery object.

Example

This example changes the selected outline-numbered list to a single-level numbered list.

Selection.Range.ListFormat.ListTemplate.OutlineNumbered = False
		

This example checks to see whether the third list in MyDoc.doc is an outline-numbered list. If it is, the third outline-numbered list template is applied to it.

Set myltemp = Documents("MyDoc.doc").Lists(3).Range _
    .ListFormat.ListTemplate
num = myltemp.OutlineNumbered
If num = True Then ActiveDocument.Lists(3).ApplyListTemplate _
    ListTemplate:=ListGalleries(wdOutlineNumberGallery) _
    .ListTemplates(3)