ツイッター出題回答
「VBA Match関数の限界」についての誤解

https://twitter.com/yamaoka_ss/status/1283049010618675202
たまにエゴサーチも良い。
> ここのサイトはあまり信用しないほうが良いでしょう
と言われてしまった。
> こちらの当面の目的は、「〇〇○○の神髄」とやらの内容の間違いを確認することでしたから、その目的は果たしたと思っていましたが…
なかなか素晴らしい目的だな。

https://twitter.com/yamaoka_ss/status/1283051180931899393
では問題です。
ここでの論点のずれはどこにあるでしようか?
※VBAの問題としては結構難問です。たぶん。

https://twitter.com/yamaoka_ss/status/1283057242598707200
確かに説明が言葉足らずな部分があります。
そこがどこなのか、説明できますか?
それぞれでのテストコード自体は正しいものです。
では、どこが違うのでしょうか?
という問題です。

比較すべきページ

以下で一連の解説ツイートをしています。
https://twitter.com/yamaoka_ss/status/1283327042952421379
解説スタートします。
最初に問題のページの再確認から。
https://oshiete.goo.ne.jp/qa/11436912.html
https://excel-ubara.com/excelvba4/EXCEL226.html

問題点は、
・1次元配列と2次元配列の違い
・全ての要素に対して正しく検索できる配列上限は
・この上限を超えている配列内のどこまで正しく検索できるか
これらは、それぞれ別々の問題であり、別々の結果になります。
回答者は、この点が完全に分かっていないようです。
回答者のコードは、
Dim a(100000) As Long, i As Long, b As Long, j As Long
For i = 0 To 100000
a(i) = i
Next i
For j = 34400 To 65536
On Error Resume Next
b = WorksheetFunction.Match(j, a(), 0)
DoEvents
If Err.Number <> 0 Then
MsgBox b
この場合の配列aは1次元配列です。
配列a(1 To 100000)から正しく検索できる位置の上限を探してしまっています。
それが34465でエラーといっています。
Matchで正しく扱える1次元配列の上限は65536までです。
65536までの1次元配列なら正しく検索できます。
65536を超える配列は正しく検索できません。
先の34465でエラーというのは、たまたま100000の時の結果でしかありません。
試しに70000や150000でやってみると良いでしょう。
滅茶苦茶な結果になってしまうのが分かるはずです。
配列が上限を超えてしまっているので、結果がどうなるか分かりません。
対して私のVBAは、
Dim i As Long
Dim ary As Variant
ary = Range("A1:A70000")
i = WorksheetFunction.Match("***", ary, 0)
この配列aryは2次元配列です。
これに対して2010までのMatchはエラーになってましたが、
2013からはエラーにはならず、正しく扱えるようになっています。
2010では65536を超える配列の場合、
「型が一致しません」のエラーになります。
1次元、2次元に関わらずエラーになります。
2013以降では、このエラーが出なくなっています。
ただし1次元配列で正しく検索できるのは65536までの配列になります。
これを超える配列は意図しない結果になります。
記載したのは、2次元配列でのMatchについて、
「Excel2013以降では、この制限はなくなっていることが確認できました。」
と書いているものです。
2013以降では、はるかに大きな2次元配列を正しく扱えるようになっています。
ただし、1次元配列は65536までしか正しく扱えません。
先の回答者は、この点を理解していません。
100000の1次元配列をMatchでどの位置まで正しく取得できるかの検証をただけになります。
2010までなら「型が一致しません」のエラーになったので直ぐに分かったはずですが、
2013以降では、中途半端に検索できてしまうので気が付かなかったのでしょう。
そして「エラーは出ますね。」(ここのサイトはあまり信用しないほうが良いでしょう)
と書いています。
「エラーは出ますね。」は良いでしょう。ご自身で確認した範囲での回答なのですから。
しかし、私の提示しているコードを試しもせずに、
(ここのサイトはあまり信用しないほうが良いでしょう)
愚かしい事だとは思いますが、人が時に陥りやすい過ちでもあるでしょう。
このような姿勢は、結果として自身が損をすることになると思います。
Matchで扱える配列は34465までだと思いこんでしまっているのですから。
なにより、間違った回答をもらった質問者がかわいそうにさえ思えてきます。
記載内容と違うテストをしておいて、結果が違う信用できない。
さすがにこれではお話になりません、テスト経験不足でしょう。
かといって、この回答者の人格を否定などするつもりはありません。
あくまで、ここでの回答がそうだというだけの事です。
他では良い回答を沢山しているかもしれません。
「VBAでシート関数使用時の配列要素数制限」
https://excel-ubara.com/excelvba4/EXCEL_VBA_434.html

この検証も全てが絶対に間違っていないとは言いません。
今後のバージョンや環境によっても違った結果になる事もあるでしょう。
もし違った結果が出たというのなら、連絡をもらえれば、可能な限り徹底的に再検証します。

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