Shows all headings up to the specified heading level and hides subordinate headings and body text.
Note This method generates an error if the view isn't outline view or master document view.
expression.ShowHeading(Level)
expression Required. An expression that returns a View object.
Level Required Long. The outline heading level (a number from 1 to 9).
Example
This example switches the active window to outline view and displays all text that's formatted with the Heading 1 style. Body text and all other types of headings are hidden.
With ActiveDocument.ActiveWindow.View
.Type = wdOutlineView
.ShowHeading 1
End With
This example switches the window for Document1 to outline view and displays all text that's formatted with the Heading 1, Heading 2, or Heading 3 style.
With Windows("Document1").View
.Type = wdOutlineView
.ShowHeading 3
End With