セル数、行数、列数を求める
サンプルソース
|
' A1〜E5のセル数 Cells(4,1) = Range("A1:E5").Cells.Count ' 結果：3×5 ' A1〜E5の行数 Cells(5,1) = Range("A1:E5").Rows.Count ' 結果：3 ' A1〜E5の列数 Cells(6,1) = Range("A1:E5").Columns.Count ' 結果：5 |
|
' シート全体のセル数 Cells(1,1) = Cells.Count ' Excel2003以前：65536×256、Excel2007以降：1048576×16384 ' シート全体の行数 Cells(2,1) = Rows.Count ' Excel2003以前：65536、Excel2007以降：1048576 ' シート全体の列数 Cells(3,1) = Columns.Count ' Excel2003以前：256、Excel2007以降：16384 |
解説
Cells.Countでセル数を取得します。
Rangeなどを前に付けない場合は最大セル数を取得します。
Rows.Countで行数を取得します。
Rangeなどを前に付けない場合は最大行数を取得します。
Columns.Countで列数を取得します。
Rangeなどを前に付けない場合は最大列数を取得します。