View.CollapseOutline メソッド (Word)

選択範囲または指定範囲の本文と下位の見出しを、1 レベルだけ折りたたんで非表示にします。

構文

式。 CollapseOutline( _Range_ )

式 が必要です。 'View' オブジェクトを表す変数。

パラメーター

名前	必須 / オプション	データ型	説明
Range	省略可能	Range object	折りたたむ段落の範囲を指定します。 この引数を省略すると、選択範囲全体が折りたたまれます。

注釈

文書の表示モードがアウトライン表示またはグループ文書モードではない場合、エラーが発生します。

例

次の使用例は、[見出し 2] スタイルを作業中の文書の 2 番目の段落に適用し、作業中のウィンドウの表モードをアウトライン モードに切り替え、文書の 2 番目の段落の下位の文字列を、1 レベルだけ折りたたみます。

ActiveDocument.Paragraphs(2).Style = wdStyleHeading2 
With ActiveDocument.ActiveWindow.View 
 .Type = wdOutlineView 
 .CollapseOutline Range:=ActiveDocument.Paragraphs(2).Range 
End With

次の使用例は、文書のすべての見出しを 1 レベルだけ折りたたみます。

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

関連項目

ビュー オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。