配列のUBoundがLBoundがより小さいことはあり得るか

公開日：2020-09-02　最終更新日：2020-09-02

配列のUBoundがLBoundがより小さいことはあり得るか

ツイッターでVBAのお題として出したものです。

配列の下限が上限より大きくなるような配列は存在するかの問題です。
LBound(ary) > UBound(ary)
この条件を満たすような配列は存在するか?

問題を出したツイート

配列の下限と上限を調べるにはLBound関数とUBound関数を使います。
変数aryについて、
LBound(ary) > UBound(ary)
この条件を満たすような配列は存在するかについての問題です。
以下の文章で正しいものはどれか?
・そんな配列は存在しない
・存在するがVBAで意図的に作ることはできない
・存在するしVBAで簡単に作ることができる
・にゃんともいえない

https://twitter.com/yamaoka_ss/status/1300811819997491202

回答・解説のツイート

以下で一連の解説ツイートをしています。

https://twitter.com/yamaoka_ss/status/1301146057494024193

お決まりの結果になってしまいました(笑)
「にゃんともいえない」もうこれは正解とも言えるけど、、、

正解は「存在するしVBAで簡単に作ることができる」
LBound(ary) > UBound(ary)
このような配列は存在するし、VBAで簡単に作成できます。

変数が配列であるかを確認するには、IsArray関数を使います。
つまり実際のVBAで書くと、
If IsArray(ary) Then
　　If LBound(ary) > UBound(ary) Then
　　　　MsgBox "これだ"
　　End If
End If
このような状態の配列です。

では、
LBound(ary) > UBound(ary)
これがどのような時に発生するかというと、
長さ0の空の配列の場合に起こります。
LBound = 0
UBound = -1
このようになっている状態です。
Stringの""と同じようなものだと考えれば良いでしょう。

配列の要素数は、
UBound(ary) - LBound(ary) + 1
例えば、
Dim ary(0 to 2)
2 - 0 + 1 = 3
3個の要素を持つ配列になります。
要素数0の空の配列は、
-1 + 0 + 1 = 0
0個の要素を持つ配列という事になります。

このような配列をVBAで作成するには、以下のような方法があります。
ary1 = Array()
※ary1は、VariantもしくはVariant配列でなければなりません。
ary2 = Split("")
※ary2は、VariantもしくはString配列でなければなりません。

ただし、このような配列を使いまわす（他へ代入する）ような場合は注意が必要です。
1年前のアプデで問題が発生したのは記憶に新しいところです。
説明は以上です。
https://twitter.com/yamaoka_ss/status/1162215395723399169

同じテーマ「ツイッター出題回答」の記事

囲碁で相手の石を囲んで取るアルゴリズム

ツイッターで出したVBAのお題です。Excel囲碁を作っていて、相手の石を囲んで取れるかどうかの判定、相手の石を取るにはどうしたら良いかというもの。囲碁で相手の石をとるここで、8二に黒を打てば、このように囲まれている白が取られます。

VBAで「3Lと5Lのバケツで4Lの水を作る」を解く

ツイッターでVBAのお題として出したものです。昔からよくある問題です。「3Lと5Lのバケツで4Lの水を作る」これをVBAを使って自動で求めてみようという事です。VBA問題：ツイートの記録【VBA問題】「3Lと5Lのバケツで4Lの水を作る」・2つの容器サイズは変えられるように引数で受け取る（3,5,

言語依存の関数を使用できるFormulaLocal

ツイッターでVBAのお題として出したものです。複数セルに一括で数式を入れるバ宇井の記述と、言語環境に依存する関数をセルに設定する場合のFormulaプロパティの使い方についての問題です。問題を出したツイート A1:A10セルに半角の英数文字が入っているので、これを全角で表示するためにB1:B10セルに数式をVBAで…

配列のUBoundがLBoundがより小さいことはあり得るか
コレクションの要素を削除する場合

ツイッターで出したVBAのお題（投票）です。Collectionから要素を順に削除するVBAの正誤問題です。問題を出したツイート【VBA問題】 DimcAsNewCollection Dimi Fori=1To100 c.Addi,CStr(i) Next Fori=1To100 c.Remove□ Next 四…

greeenはgreenに、greeeeeNをGReeeeNに変換

ツイッターで出したエクセルの入力規則のお題です。「greeenはgreenに、greeeeeNやGReeeeeenはGReeeeNに直す」文字列操作のVBA問題です。問題を出したツイート【VBA問題】 greenは緑です。

数値変数の値を別の変数を使わずに入れ替える

ツイッターで出したエクセルVBAのお題です。数値が入っている3つの変数を、他の変数を使わずに値を入れ替えるという問題です。問題を出したツイート【VBA問題】変数a,b,cに整数値が入っています。これをa>b>cとなるように値を入れ替えてください。

Rangeオブジェクトを受け取り"行数,列数"で埋める

ツイッターで出したエクセルVBAのお題です。Rangeオブジェクトを受け取り、"行数,列数"の値（数式ではなく値）で埋めるVBAを書く問題です。問題を出したツイート【VBAお題】 Rangeオブジェクトを受け取り、添付のように"行数,列数"の値（数式ではなく値）で埋めてくだ…

数式の関数の使用回数、関数名を配列で返す

ツイッターで出したエクセルVBAのお題です。セルに入っている計算式に使われている関数（ユーザー定義含む）を数えてみましょう、というお題になります。問題を出したツイート【VBAお題】セルに計算式が入っています。

日付型と通貨型のValueとValue2について

ツイッターでVBAに関する問題を出しました。問題としてはValueとValue2について問うもので、日付型と通貨型が問題の焦点になります。https://twitter.com/yamaoka_ss/status/1408259798357794817 VBA問題の出題ツイート【VBA問題】 Rangeに対して、

小文字"abc"を大文字"ABC"に変換する方法

ツイッターで出した「VBA問題」です。小文字"abc"を大文字"ABC"に変換する方法を可能な限り列挙してください。という問題です。。出題ツイート https://twitter.com/yamaoka_ss/status/1425799283303882758 「VBA問題…

アクセスランキング・・・ランキング一覧を見る

1.最終行の取得（End,Rows.Count）｜VBA入門
2.繰り返し処理（For Next)｜VBA入門
3.セルのコピー&値の貼り付け（PasteSpecial）｜VBA入門
4.変数宣言のDimとデータ型｜VBA入門
5.RangeとCellsの使い方｜VBA入門
6.ブックを閉じる・保存（Close,Save,SaveAs）｜VBA入門
7.セルのクリア（Clear,ClearContents）｜VBA入門
8.メッセージボックス(MsgBox関数)｜VBA入門
9.条件分岐（Select Case）｜VBA入門
10.ブック・シートの選択（Select,Activate）｜VBA入門

ホーム
エクセル全般
ツイッター出題回答
配列のUBoundがLBoundがより小さいことはあり得るか

このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。

記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。

ツイッター出題回答
配列のUBoundがLBoundがより小さいことはあり得るか