【VBA】最終行を取得する、最終列を取得する
最終行を取得する、最終列を取得する
エクセルでデータのある最終行を取得する方法と、データのある最終列を取得する方法を紹介します。
'最終行を取得する
Worksheets(シート名).Cells(Rows.Count, 最終行をチェックする列番号).End(xlUp).Row
'実行例
Worksheets(シート名).Cells(Rows.Count, 1).End(xlUp).Row
'最終列を取得する
Worksheets(シート名).Cells(最終行をチェックする行番号, Columns.Count).End(xlToLeft).Column
'実行例
Worksheets(シート名).Cells(1, Columns.Count).End(xlToLeft).Column