View.CollapseOutline method (Word)
Collapses the text under the selection or the specified range by one heading level.
expression Required. A variable that represents a 'View' object.
|Range||Optional||Range object||The range of paragraphs to be collapsed. If this argument is omitted, the entire selection is collapsed.|
If the document isn't in outline or master document view, an error occurs.
This example applies the Heading 2 style to the second paragraph in the active document, switches the active window to outline view, and collapses the text under the second paragraph in the document.
ActiveDocument.Paragraphs(2).Style = wdStyleHeading2 With ActiveDocument.ActiveWindow.View .Type = wdOutlineView .CollapseOutline Range:=ActiveDocument.Paragraphs(2).Range End With
This example collapses every heading in the document by one level.
With ActiveDocument.ActiveWindow.View .Type = wdOutlineView .CollapseOutline Range:=ActiveDocument.Content End With
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.