Excel VBA 之 UBound

1.简介

UBound 为 Visual Basic 中的一个函数，用来返回数组或元素相应维度的最大值。

同理，LBound函数是获取最小值

2.用法

UBound(数组名,[第n维])

第n维是可选项，默认值 为 1 ，将返回最大下标

3.实例

• Sub 宏1()
      Dim arr, he ’局部变量定义
      arr = Sheet1.Range("A1").CurrentRegion ‘选定区域
      he = UBound(arr, 1) ‘获取最大
      Sheet1.Range("E1").Value = he ’赋值显示验证
  End Sub

上例为 Excel 中的一个宏。 由于 表只有两个维度，故取值范围只能为 1，2

UBound(arr, 1)，UBound(arr, 2)

1表示 列方向，即 最大行数

2表示 行方向 ， 即 最大列数

4.参考

百度百科

  http://baike.baidu.com/link?url=hpiNXSNIyvzN4sX6zaKEMB97JC7V3tqqQbLl-NcqjafJ3b7R5E7Dq5YY3gtrqm1bzobQyc9VR97DMib8HGXAX_