Como usar a função Split no VBA?

A função `Split` no VBA é usada para dividir uma string em um array de substrings com base em um delimitador especificado. Essa função é muito útil quando você precisa separar elementos de uma string, como dividir uma frase em palavras ou separar valores separados por vírgulas.

Aqui está a sintaxe básica da função `Split`:

Split(expression, [delimiter], [limit], [compare])

`expression`: A string que você deseja dividir.
`delimiter`: (Opcional) O caractere usado para dividir a string. Se não especificado, o padrão é um espaço (” “).
`limit`: (Opcional) O número máximo de substrings em que a expressão será dividida. O padrão é -1, o que significa que todas as partes serão incluídas.
`compare`: (Opcional) Tipo de comparação a ser usada. O padrão é `vbBinaryCompare`.

Exemplo de Uso

Vamos ver um exemplo de como usar a função `Split` para dividir uma string:

Sub ExemploSplit()
    Dim minhaString As String
    Dim resultado() As String
    Dim i As Integer
    
    ' String de exemplo
    minhaString = "maçã,banana,laranja,uva"
    
    ' Usando Split para dividir a string
    resultado = Split(minhaString, ",")
    
    ' Exibindo os resultados
    For i = LBound(resultado) To UBound(resultado)
        Debug.Print resultado(i)
    Next i
End Sub

Neste exemplo, a string “maçã,banana,laranja,uva” é dividida em substrings usando a vírgula (`,`) como delimitador. O resultado é um array de strings, e cada elemento do array é uma fruta que foi separada da string original. O loop exibe cada fruta no console do VBA.

Considerações

Se o delimitador não for encontrado na string, o array retornado terá apenas um elemento, que é a string inteira.
Se a string original estiver vazia, o `Split` irá retornar um array vazio.

Este exemplo deve ajudar você a começar a usar a função `Split` no VBA para manipular strings de forma eficaz. Se precisar de mais exemplos ou tiver outras dúvidas, sinta-se à vontade para perguntar!

facebooklinkedin