La función VBA UBound devuelve el índice más grande disponible para la matriz especificada.
UBound(matriz)
O
UBound(matriz, dimensión)
Usando la función UBound para obtener el índice de cada una de las 2 dimensiones de la matriz:
Sub UBoundExample1() Dim array(10, 4) 'El índice máximo de la primera dimensión. MsgBox UBound(array) 'Devoluciones: 10 'El índice máximo de la segunda dimensión. MsgBox UBound(array, 2) 'Devoluciones: 4 End Sub
Usando la función UBound para obtener la cantidad de valores en la matriz creada por la función SPLIT:
Sub UBoundExample2() link = "www.moonexcel.com.ua" 'Dividir una cadena de caracteres en una matriz array = Split(link, ".") 'Número de elementos de la matriz (sabiendo que la matriz comienza en 0) number = UBound(array) + 1 'Mostrar el número de elementos de la matriz MsgBox number 'Devoluciones: 4 End Sub