Função VBA: UBound

Descrição

A função VBA UBound retorna o maior índice disponível para a matriz especificada.

Sintaxe UBound

UBound (matriz)

Ou

UBound(matriz, dimensão)

Exemplo VBA UBound

Usando a função UBound para obter o índice de cada uma das 2 dimensões do array:

Sub UBoundExample1()

     Dim array(10, 4)
    
     'O índice máximo da primeira dimensão
     MsgBox UBound(array) 'Retorna: 10
    
     'O índice máximo da segunda dimensão
     MsgBox UBound(array, 2) 'Retorna: 4

End Sub

Usando a função UBound para obter o número de valores no array criado pela função SPLIT:

Sub UBoundExample2()

     link = "www.moonexcel.com.ua"
    
     'Dividindo uma string de caracteres em um array
     array = Split(link, ".")
    
     'Número de elementos do array (sabendo que o array começa em 0)
     number = UBound(array) + 1
    
     'Exibir o número de elementos da matriz
     MsgBox number 'Retorna: 4

End Sub