VBA技術解説
セル個数を返すRange.CountLargeプロパティとは

Rangeのプロパティ一覧 Rangeのメソッド一覧

最終行取得のコードでも使われていますね。
第18回.最終行の取得（End,Rows.Count）｜VBA入門

Office2003以前からあるプロパティです。

データ型は、Longです。
Longなので値の範囲は、
-2,147,483,648 ～ 2,147,483,647
Excel2003までの.xls形式のシートの大きさは、
行数：65,536
列数：256
つまりシートの全セル数は16,777,216
Long型に入る数値範囲です。

Office2007以降に追加されたプロパティです。

データ型は、Variantです。
Variantなので値の範囲は、、、VBAが扱える範囲なら何でも入ります。
Excel2007以降のxlsxやxlsmのシートの大きさは、
行数：1,048,576
列数：16,384
つまりシートの全セル数は17,179,869,184
Long型には入りきらない数値です。

PropertyではVariantとなっていますが、実際のデータはLongLongですので、
Variant/LongLong
このようになっています。
※LongLongについては後述します。
上記のVBAでは、全セル数を取得しているので、
v = Cells.Count
これで実行すると、オーバーフローしてしまいます。

実際にはシートの全セル数を取得しても仕方ないので、
普通は限られた範囲のRangeオブジェクトのセル数を取得することになると思います。
限られた範囲であれば、Countでも大抵の場合は問題ありません。
CountはLongなので21億まで入りますので、普通は問題ありません。
しかし、列全部のセル数となると列数が多くなってくるとオーバーフローしてしまいます。
具体的には、
1048576*2048=2,147,483,648
これでLongでは1オーバーしてしまう大きさとなります。

LongLong型は64ビットのExcelでサポートされるデータ型です。
64ビット符号付き数値で、
-9223372036854775808 ～ 9223372036854775807
※64ビットプラットフォームのみで有効な宣言型です。
32ビットのExcelではサポートされないデータ型になりますので、32ビットでは、

すると、ここでちょっと疑問がでてきます。
32ビットExcelでxlsxのシートの全セル数を取得したらどうなるのか・・・
※CountLargeプロパティは32ビットExcelでも存在します。

変数vはVariantなので値は入りますが、VBA・VBEはデータ型を認識できません。

32ビットではLongLongをデータ型として正式に扱えないというだけです。
Variantの1形式として扱う事は出来ますので、Variantに入れさえすれば計算に使ったり普通に扱うぶんには困る事はありません。

Variantの1形式として扱うということでは、Decimalと同じくらいに扱えると考えれば良いかもしれません。

LongPtrについて

同じテーマの記事
新着記事
アクセスランク