Excel中VB编程如何获取数组的元素个数和维数

Question

比如已知数组ArrA,但不知道它的维数和元素个数,那如何才能获取呢?
UBound函数不适用于多维数组,对于一维函数也不太准确
有更准确的办法么
多谢了,达人们

Answer 1

领用下面代码可获取数组个数：
(UBound(A,1)-LBound(A,1))*((UBound(A,2)-LBound(A,2))

其中Ubound(A,1)为数组第一维上限，Lbound(A,1)为数组第一维下限，二者相减及为数组第一维的个数，同理，后面是数组第二维的个数，两者的乘积即该数组所有元素的个数。

Answer 2

UBound函数适用于多维数组
UBound(A,1)是第一维上限
UBound(A,2)是第二维上限
等等
一个二维数组的总元素个数为
(UBound(A,1)-LBound(A,1))*((UBound(A,2)-LBound(A,2))
不应该有不准确的情况，是不是你没有减去Lbound？本回答被提问者采纳

Answer 3

你每个维度都少加了个1
完整公式 (UBound(ArrA, 1) - LBound(ArrA, 1) + 1) * ((UBound(ArrA, 2) - LBound(ArrA, 2) + 1))

Answer 4

领用下面代码可获取数组个数：
(UBound(A,1)-LBound(A,1)+1)*((UBound(A,2)-LBound(A,2)+1)