セル個数を返すRange.CountLargeプロパティとは
VBAにおいて最も良く使われるオブジェクトはRangeオブジェクトなのはいうまでもないですね。
このRangeオブジェクトには多数のプロバティが用意されています。
Rangeのプロパティ一覧
・Excel2010までのRangeオブジェクトのプロパティ一覧 ・Excel2016で追加されたRangeオブジェクトのプロパティ一覧 ・スピルにより追加されたRangeオブジェクトのプロパティ一覧
Rangeのメソッド一覧・Excel2010までのRangeオブジェクトのメソッド一覧 ・Excel2013で追加されたRangeオブジェクトのメソッド一覧 ・Excel2016で追加されたRangeオブジェクトのメソッド一覧
Rangeオブジェクトに含まれるセルの個数を取得できるプロパティは2つあります。
Count
CountLarge
最終行取得のコードでも使われていますね。
第18回.最終行の取得（End,Rows.Count）｜VBA入門
第18回.最終行の取得（End,Rows.Count）｜VBA入門
・エクセルVBAにおける最終行取得の必要性 ・.End(xlDown)：Ctrl+↓ ・.End(xlUp)：Ctrl+↑ ・Endプロパティの方向（↑↓←→）について ・セルの行数を取得するRowプロパティ ・Cells(Rows.Count, 1).End(xlUp).Rowを日本語に訳す ・EndプロパティがRangeオブジェクトを返す ・Endプロパティの問題点 ・最終行に関するサイト内のページ
では、もう一つの CountLargeとは何か・・・
CountとCountLargeを順に見ていくことにしましょう。
Countプロバティ
Office2003以前からあるプロパティです。
データ型は、Longです。
Longなので値の範囲は、
-2,147,483,648 ～ 2,147,483,647
Excel2003までの.xls形式のシートの大きさは、
行数：65,536
列数：256
つまりシートの全セル数は16,777,216
Long型に入る数値範囲です。
Longなので値の範囲は、
-2,147,483,648 ～ 2,147,483,647
行数：65,536
列数：256
つまりシートの全セル数は16,777,216
Long型に入る数値範囲です。
CountLargeプロバティ
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オーバーしてしまう大きさとなります。
Variantなので値の範囲は、、、VBAが扱える範囲なら何でも入ります。
行数：1,048,576
列数：16,384
つまりシートの全セル数は17,179,869,184
Long型には入りきらない数値です。
Variant/LongLong
このようになっています。
※LongLongについては後述します。
v = Cells.Count
これで実行すると、オーバーフローしてしまいます。
普通は限られた範囲のRangeオブジェクトのセル数を取得することになると思います。
限られた範囲であれば、Countでも大抵の場合は問題ありません。
CountはLongなので21億まで入りますので、普通は問題ありません。
しかし、列全部のセル数となると列数が多くなってくるとオーバーフローしてしまいます。
具体的には、
1048576*2048=2,147,483,648
これでLongでは1オーバーしてしまう大きさとなります。
LongLong型について
LongLong型は64ビットのExcelでサポートされるデータ型です。
64ビット符号付き数値で、
-9223372036854775808 ～ 9223372036854775807
※64ビットプラットフォームのみで有効な宣言型です。
32ビットのExcelではサポートされないデータ型になりますので、32ビットでは、
64ビット符号付き数値で、
-9223372036854775808 ～ 9223372036854775807
※64ビットプラットフォームのみで有効な宣言型です。
32ビットのExcelではサポートされないデータ型になりますので、32ビットでは、
すると、ここでちょっと疑問がでてきます。
32ビットExcelでxlsxのシートの全セル数を取得したらどうなるのか・・・
※CountLargeプロパティは32ビットExcelでも存在します。
変数vはVariantなので値は入りますが、VBA・VBEはデータ型を認識できません。
32ビットExcelでxlsxのシートの全セル数を取得したらどうなるのか・・・
※CountLargeプロパティは32ビットExcelでも存在します。
Variantの1形式として扱う事は出来ますので、Variantに入れさえすれば計算に使ったり普通に扱うぶんには困る事はありません。
CDec関数
・CDec関数 ・CDec関数の使用例 ・10進型 (Decimal)について ・データ型変換関数一覧
VBAの小数以下の演算誤差について｜VBA技術解説・小数以下の演算誤差とは ・小数以下の演算誤差を実際のVBAで確認 ・データ型で小数以下の演算誤差に対応 ・小数以下の演算誤差にデータ型以外で対応する ・VBAの小数以下の演算誤差の最後に
100桁の正の整数値の足し算｜ツイッター出題回答ツイッターで出したVBAのお題です。数の単位に「無量大数」というものがあります。VBAでこの無量大数の足し算をするにはどうしたら良いでしょうか。そこで、100桁の正の整数の足し算をVBAで実現してみましょう。
LongPtrについて
WinAPIを扱う場合には必須となってくるのがLongPtrです。
LongPtrは、32 ビット環境と64 ビット環境で それぞれ以下に変換されます。
32ビットシステムでは、符号付き32ビット (4 バイト) の数値、つまりLong
64ビットシステムでは、符号付き64ビット (8 バイト) の数値、つまりLongLong
上記のセル数を取得するVBAでは、32ビットでもLongLongを扱いたかったので、このLongPtrの出る幕はありませんでした。
LongPtrは、32 ビット環境と64 ビット環境で それぞれ以下に変換されます。
32ビットシステムでは、符号付き32ビット (4 バイト) の数値、つまりLong
64ビットシステムでは、符号付き64ビット (8 バイト) の数値、つまりLongLong
同じテーマ「マクロVBA技術解説」の記事
Select Caseでの短絡評価（ショートサーキット）の使い方
・Select Caseの基本 ・短絡評価（ショートサーキット）について ・Ifステートメントのネストの書き換え ・Select Case での短絡評価（ショートサーキット） ・Select Case を使った短絡評価使用の是非
RangeオブジェクトのFor EachとAreasについて・正解は ・RangeオブジェクトをFor Eachで取得すると ・RangeオブジェクトをItemで取得すると ・RangeオブジェクトのFor EachとAreasの最後に
画像が行列削除についてこない場合の対処複数ブック・複数シートを次々に処理していくようなVBAにおいて、行削除や列削除をした時に、画像がセルの移動についてこない場合があります。プロパティは、「セルに合わせて移動やサイズ変更をする」になっている場合です。プロパティで「セルに合わせて移動する」になっているにも関わらず、画像が行列削除で移動しないといった現象が…
新関数SORTBYをVBAで利用するラップ関数を作成新関数はスピルに対応していてとても便利です。新関数はVBAからもWorksheetFunctionで利用できます。シート関数には件数制限があるので使用する場合は注意が必要ですが、その範囲内ならVBAでもとても便利に利用できます。
LAMBDA以降の新関数はVBAで使えるか・TEXTSPLIT関数 ・TEXTBEFORE関数,TEXTAFTER関数 ・TOROW関数,TOCOL関数 ・WRAPROWS関数,WRAPCOLS関数 ・VSTACK関数,HSTACK関数
数字（1～50）を丸付き数字に変換するVBA数値には丸付き数字があります。ただし1～50までしかありません。①②③④⑤⑥⑦⑧⑨⑩⑪⑫⑬⑭⑮⑯⑰⑱⑲⑳㉑㉒㉓㉔㉕㉖㉗㉘㉙ChrW(12…
文字列のプロパティ名でオブジェクトを操作する方法・CallByName関数 ・Propertyについて ・文字列のプロパティ名でオブジェクトを操作するVBAサンプル
OneDrive使用時のThisWorkbook.Pathの扱い方マクロVBAでは、現在動いているマクロVBAが書かれているブックのバス（Path）を取得し、そのフォルダを使って処理を組み立てる方法が良く用いられます。ところがOneDriveと同期しているフォルダでは、このような処理が従来のVBAコードでは行えなくなっています。
セル個数を返すRange.CountLargeプロパティとは画像「セルに配置」のVBAについて（365の新機能）
・IMAGE関数 ・手動で画像を「セルに配置」 ・「セルに配置」⇔「セルの上に配置」 ・「セルに配置」「セルの上に配置」のVBA ・画像が「セルに配置」されたセルのコピー
VBAでクリップボードへ文字列を送信・取得する3つの方法・VBAの3つの方法について ・1. DataObjectを使うVBA ・2. TextBox を使うVBA ・3. Win32 API を使うVBA
新着記事NEW ・・・新着記事一覧を見る
TRIMRANGE関数（セル範囲をトリム：端の空白セルを除外）｜エクセル入門(2024-08-30)
正規表現関数（REGEXTEST,REGEXREPLACE,REGEXEXTRACT）｜エクセル入門(2024-07-02)
エクセルが起動しない、Excelが立ち上がらない｜エクセル雑感(2024-04-11)
ブール型（Boolean）のis変数・フラグについて｜VBA技術解説(2024-04-05)
テキストの内容によって図形を削除する｜VBA技術解説(2024-04-02)
ExcelマクロVBA入門目次｜エクセルの神髄(2024-03-20)
VBA10大躓きポイント（初心者が躓きやすいポイント）｜VBA技術解説(2024-03-05)
テンキーのスクリーンキーボード作成｜ユーザーフォーム入門(2024-02-26)
無効な前方参照か、コンパイルされていない種類への参照です。｜エクセル雑感(2024-02-17)
初級脱出10問パック｜VBA練習問題(2024-01-24)
アクセスランキング ・・・ ランキング一覧を見る
1.最終行の取得（End,Rows.Count）｜VBA入門
2.セルのコピー&値の貼り付け（PasteSpecial）｜VBA入門
3.変数宣言のDimとデータ型｜VBA入門
4.繰り返し処理（For Next)｜VBA入門
5.RangeとCellsの使い方｜VBA入門
6.ブックを閉じる・保存（Close,Save,SaveAs）｜VBA入門
7.セルのクリア（Clear,ClearContents）｜VBA入門
8.メッセージボックス(MsgBox関数)｜VBA入門
9.条件分岐（Select Case）｜VBA入門
10.マクロとは？VBAとは？VBAでできること｜VBA入門
- ホーム
- マクロVBA応用編
- マクロVBA技術解説
- セル個数を返すRange.CountLargeプロパティとは
このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。