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_