ExpandOutline Method

Expands the text under the selection or the specified range by one heading level.

Note  If the document isn't in outline or master document view, an error occurs.

expression.ExpandOutline(Range)

expression    Required. An expression that returns a View object.

Range    Optional Range object. The range of paragraphs to be expanded. If this argument is omitted, the entire selection is expanded.

Example

This example expands every heading in the document by one level.

With ActiveDocument.ActiveWindow.View
    .Type = wdOutlineView
    .ExpandOutline Range:=ActiveDocument.Content
End With
		

This example expands the active paragraph in the Document2 window.

With Windows("Document2")
    .Activate
    .View.Type = wdOutlineView
    .View.ExpandOutline
End With