アウトライン(AutoOutling)メソッドは、
 合計などの数式が設定されている表で、数式の列や行を基準にして自動的にアウトラインを作成する機能です。数式が設定された列や行が表示され、それ以外折りたたむようにアウトラインが作成されます。
 

 

アウトラインを作成

 

Sub test()
  ’ アウトラインを作成

  Range("A2").AutoOutline


End Sub

 

 

 

アウトラインを解除

 

Sub test()
  ’ アウトラインを解除

  Range("A2").ClearOutline
End Sub

 

実行結果

 

 

アウトラインをたたむ

 

Sub test()
  ’ アウトラインをたたむ

  ActiveSheet.Outline.ShowLevels RowLevels:=1
End Sub

 

 

実行結果

 

 

アウトラインを展開

 

Sub test()
  ’ アウトラインを展開

  ActiveSheet.Outline.ShowLevels RowLevels:=2
End Sub

 すべてのアウトラインを展開したい場合、左上の階層の最大の数字を指定すればいいです。

 

実行結果

 

― ― ― ― ― ― ― ― ― ― → Excel VBA基礎入門もくじ へ戻る