VBA UBound()函数用于获取一个数组的上界（最大索引值）。它的语法如下：
UBound(arrayname, [dimension])
UBound()函数返回一个整数值，表示指定维度上的最大索引值。例如，如果数组中有 5 个元素，则上界为 5-1=4。
下面是一个示例：
云服务器
物理服务器
虚拟主机
跨境电商服务器Dim arr(1 To 5) As Integer
Dim maxIndex As Integer
maxIndex = UBound(arr)
Debug.Print maxIndex ' 输出 5
在上面的示例中，UBound(arr) 返回数组 arr 的第一个维度上的最大索引值，即 5。
辰迅云「云服务器」，即开即用、新一代英特尔至强铂金CPU、三副本存储NVMe SSD云盘，价格低至29元/月。点击查看>>
推荐阅读： vba中range变量如何使用