要在Excel VBA中获取数组的大小,可以使用UBound和LBound函数。
在您的工作表上放置一个命令按钮,并添加以下代码行:
1.首先,我们需要声明数组。我们的数组有两个维度。它由5行和2列组成。还声明两个Integer类型的变量。
昏暗的电影(1 到 5,1 到 2)作为 字符串,x 作为 整数,y 作为 整数
该数组可能看起来像这样。
2.接下来,我们获得数组的大小。添加以下代码行:
x = UBound(胶片,1)-LBound(胶片,1)+ 1
y = UBound(胶片,2)-LBound(胶片,2)+ 1
y = UBound(胶片,2)-LBound(胶片,2)+ 1
UBound(Films,1)给出第一维的上限,即
5。LBound(Films,1)给出第一维的下限,即
1。UBound(Films,2)给出第一维的上限。第二维,即
2。LBound(Films,2)给出第二维的下限,即1。
结果,x等于5,y等于2。
3.我们使用MsgBox来显示数组元素的数量。
MsgBox“此数组由”&x * y&“元素组成
结果: