Função UBound
Retorna o limite superior de uma matriz.
UBound (ArrayName [, Dimension])
Long
ArrayName: nome da matriz para o qual se deseja determinar o limite superior (Ubound) ou inferior (LBound).
[Dimension]: número inteiro que especifica a dimensão para a qual será retornado o limite superior (Ubound) ou inferior (LBound). Se não for especificado nenhum valor, será retornado o limite da primeira dimensão.
Sub VectorBounds
Dim v(10 To 20) As String
Print LBound(v()) ' retorna 10
Print UBound(v) ' returns 20
End Sub ' VectorBounds
Sub TableBounds
Dim t(10 To 20,-5 To 70) As Currency
Print LBound(t), UBound(t()) ' retorna 10 20
Print LBound(t(),2) ' retorna - 5
Print UBound(t,2) ' retorna 70
End Sub ' TableBounds