【Excel VBA】ウィンドウの分割（Split/SplitRow/SplitColumn）

前提

関連プロパティ

ウィンドウの分割には、以下の3つのプロパティで実施します。

基本情報

SplitRowプロパティ

上側のエリアに表示する行数を指定し、ウィンドウを分割する場合、WindowオブジェクトのSplitRowプロパティを使用します。

※文章だと分かりづらい為、サンプルコードに実行結果を掲載していますのでご参考にしてください。
（参考：サンプルコード – 行を指定してウィンドウを分割する）

構文

設定値

上側のエリアに表示する行数を 数値で指定します。

SplitColumnプロパティ

左側のエリアに表示する行数を指定し、ウィンドウを分割する場合、WindowオブジェクトのSplitColumnプロパティを使用します。

※文章だと分かりづらい為、サンプルコードに実行結果を掲載していますのでご参考にしてください。
（参考：サンプルコード – 列を指定してウィンドウを分割する）

構文

設定値

左側のエリアに表示する列数を 数値で指定します。

Splitプロパティ

WindowオブジェクトのSplitプロパティでは、ウィンドウの分割やウィンドウの分割を解除することが可能です。
（参考：サンプルコード – アクティブセルを起点としてウィンドウを分割する）

構文

設定値

サンプルコード

行を指定してウィンドウを分割する

Public Sub splitWindow()

    ' 上側のエリアに表示する行数を 3として分割
    ActiveWindow.SplitRow = 3
End Sub

実行結果

※上記キャプチャに使用されているデータは、Excelのテンプレート機能を使用して自動生成されたものです。

列を指定してウィンドウを分割する

Public Sub splitWindow()

    ' 左側のエリアに表示する列数を 4として分割
    ActiveWindow.SplitColumn = 4
End Sub

実行結果

アクティブセルを起点としてウィンドウを分割する

Public Sub splitWindow()

    ' E4セルをアクティブ化
    Range("E4").Activate

    ' アクティブセル（E4セル）を起点とし、ウィンドウを分割
    ActiveWindow.Split = True
End Sub

実行結果

ウィンドウの分割状態を解除する

Public Sub splitWindow()

    ' ウィンドウの分割を解除する
    ActiveWindow.Split = False
End Sub

最後に

今回は、ウィンドウを分割する方法を解説しました。

冒頭でも説明しましたが、ウィンドウ枠の固定と使い分けをしましょう。
個人的には、2つの表がある場合に分割を実施することで互いの表を比較するために使用したりします。

この記事が、皆さんのお力になれば幸いです！