White Tiger

Microsoft Excel VBA - データの最終行や最終列を取得する方法

◆概要

このページは、Excel VBAでデータの最終行や最終列を取得する方法について記載しています。

　エクセルでＶＢＡを使用してコードを書く時、よく使うのが、データの端の行や列を取得するコードです。データの端の行や列を取得することで、データ数が変わっても処理ができるようになります。

◆最終行（データの一番下の行番号）を取得する
Cells(Rows.Count, 1).End(xlUp).Row
　Ａ列の最終行を取得します。セルの下端から上方向に向かって一番最初にデータのあるセルの行を返します。数字の部分を変えることでＡ列以外の列の最終行を取得できます。

◆最終列（データの一番右の列番号）を取得する
Cells(1, Columns.Count).End(xlToLeft).Column
　１行目の右端の列を取得します。セルの右端から左方向に向かって一番最初にデータのあるセルの列を返します。数字の部分を変えることで指定した行の右端の列を取得できます。

◆最初の行（データの一番上の行番号）を取得する
Cells(1, 1).End(xlDown).Row
　セルＡ１から下方向に向かって一番最初にデータのあるセルの行を返します。数字の部分を変えることで開始するセルを変更できます。

◆最初の列（データの一番左の列番号）を取得する
Cells(1, 1).End(xlToRight).Column
　セルＡ１から右方向に向かって一番最初にデータのあるセルの列を返します。数字の部分を変えることで開始するセルを変更できます。

参考
VBAでセルおよびセル範囲を選択する方法

Link