エクセル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

配列は次のようになります。

Size of an Array in Excel VBA

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"

結果:

Size of an Array Result