セル数、行数、列数を求める
サンプルソース
' 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などを前に付けない場合は最大列数を取得します。