エクセルVBAで配列のサイズ
エクセルVBAで配列のサイズを取得するには、UBound関数とLBOUND関数を使用することができます。
ワークシート上のコマンドボタンを配置し、次のコード行を追加します。
1.まず、我々は、配列を宣言する必要があります。私たちの配列は、2次元を持っています。
これは、5行2列で構成されています。また、Integer型の2つの変数を宣言します。
Dim Films(1 To 5, 1 To 2) As String, x As Integer, y As Integer
配列は次のようになります。
2.次に、我々は、配列のサイズを取得します。次のコード行を追加します。
x = UBound(Films, 1) - LBound(Films, 1) + 1 y = UBound(Films, 2) - LBound(Films, 2) + 1
UBound関数(フィルム1)は5である第一の次元の上限を与える
LBOUND(フィルム1)は1である。第一寸法の下限を与える
UBound関数(フィルム、2)2 – である二次元の上限を与える
LBOUND(フィルム、2)が1である二次元の下限を与える
その結果、xは5に等しく、yは2に等しく
3.当社は、配列の要素の数を表示するメッセージボックスを使用します。
MsgBox "This array consists of " & x * y & " elements"
結果: