エクセル VBA 列数 行数の取得

エクセル VBA で指定行の項目数、指定列の項目数を取得します。

c列の項目数を上から取得します。(空欄で止まります。)

ActiveSheet.Cells(1, c).End(xlDown).Row

c列の項目数を下から取得します。(空欄を含んでいてもOK。)

ActiveSheet.Cells(Rows.Count, c).End(xlUp).Row

r行の項目数を左から取得します。(空欄で止まります。)

ActiveSheet.Cells(r, 1).End(xlToRight).Column

r行の項目数を右から取得します。(空欄を含んでいてもOK。)

ActiveSheet.Cells(r, Columns.Count).End(xlToLeft).Column