Função VBA: Split

Descrição

A função VBA Split é usada para dividir uma sequência de caracteres de acordo com um delimitador para obter uma matriz de valores.

Sintaxe Split

Split(texto, separador)

Ou

Split(texto, separador, limite)

Exemplo VBA Split

Vamos dividir o nome do site "www.moonexcel.com.ua" com o separador "." para obter 4 substrings em uma matriz:

Sub SplitExample1()
    
     text = "www.moonexcel.com.ua"
    
     array = Split(text, ".")
    
     MsgBox array(0) 'Retorna: www
     MsgBox array(1) 'Retorna: moonexcel
     MsgBox array(2) 'Retorna: com
     MsgBox array(3) 'Retorna: ua
    
End Sub

Se necessário, você pode limitar o número de elementos na matriz:

Sub SplitExample2()
    
     text = "www.moonexcel.com.ua"
    
     array = Split(text, ".", 2)
    
     MsgBox array(0) 'Retorna: www
     MsgBox array(1) 'Retorna: moonexcel.com.ua
    
End Sub

Se você precisar recuperar apenas uma única substring (neste exemplo, a substring do meio "moonexcel"), poderá especificar diretamente um elemento de array para recuperá-la:

Sub SplitExample3()
    
     text = "www.moonexcel.com.ua"
    
     middle = Split(text, ".")(1)
    
     MsgBox middle 'Retorna: moonexcel
    
End Sub