在Excel中使用VBA时经常会需要知道数组索引的范围,以通过For循环执行相关操作,下面介绍VBA获取不同维数数组索引范围的方法。
工具/原料
- Office
- VBA
一、Excel中VBA获取一维数组索引范围的方法
- 1
实例代码:
Dim Arry1(10) As Integer
Dim Low As Integer
Dim Up As Integer
Low = LBound(Arry1)
Up = UBound(Arry1)
此段代码默认情况下,Low =0;Up=10,所以数组Arry1的索引范围是0到10。
END
二、Excel中VBA获取二维数组索引范围的方法
- 1
获取二维数组第一维索引范围的实例代码:
Dim Arry2(10,20) As Integer
Dim Low As Integer
Dim Up As Integer
Low = LBound(Arry2,1)
Up = UBound(Arry2,1)
此段代码默认情况下,Low =0;Up=10,所以二维数组Arry2第一维的索引范围是0到10。
获取二维数组第二维索引范围的实例代码:
Dim Arry2(10,20) As Integer
Dim Low As Integer
Dim Up As Integer
Low = LBound(Arry2,2)
Up = UBound(Arry2,2)
此段代码默认情况下,Low =0;Up=20,所以二维数组Arry2第二维的索引范围是0到20。
END
三、Excel中VBA获取多维数组索引范围的方法
- 1
通过获取一维数组和二维数组各维索引范围方法的介绍,相信读者对获取多维数组各维索引范围的方法已经了解。Excel的VBA可以声明最多60维的数组,但在具体编程时,很少会用到二维以上维数的数组。下面附上获取三维数组各维索引范围的实例(只介绍获取第三维索引范围的方法,其余两维索引范围的获取方法同二维数组):
Dim Arry3(10,20,60) As Integer
Dim Low As Integer
Dim Up As Integer
Low = LBound(Arry3,3)
Up = UBound(Arry3,3)
此段代码默认情况下,Low =0;Up=60,所以三维数组Arry3第三维的索引范围是0到60。
- 2
以上便是Excel中VBA获取数组上限和下限的方法,希望对大家有用。
END