TOP
Función VBA: Split
Descripción
La función VBA Split se utiliza para dividir una cadena de caracteres según un delimitador para obtener una matriz de valores.
Sintaxis Split
Split(texto, separador)
O
Split(texto, separador, límite)
Ejemplo VBA Split
Dividamos el nombre del sitio "www.moonexcel.com.ua" con el separador "." para obtener 4 subcadenas en una matriz:
- Sub SplitExample1()
-
- text = "www.moonexcel.com.ua"
-
- array = Split(text, ".")
-
- MsgBox array(0)
- MsgBox array(1)
- MsgBox array(2)
- MsgBox array(3)
-
- End Sub
Sub SplitExample1()
text = "www.moonexcel.com.ua"
array = Split(text, ".")
MsgBox array(0) 'Devoluciones: www
MsgBox array(1) 'Devoluciones: moonexcel
MsgBox array(2) 'Devoluciones: com
MsgBox array(3) 'Devoluciones: ua
End Sub
Si es necesario, puede limitar la cantidad de elementos en la matriz:
- Sub SplitExample2()
-
- text = "www.moonexcel.com.ua"
-
- array = Split(text, ".", 2)
-
- MsgBox array(0)
- MsgBox array(1)
-
- End Sub
Sub SplitExample2()
text = "www.moonexcel.com.ua"
array = Split(text, ".", 2)
MsgBox array(0) 'Devoluciones: www
MsgBox array(1) 'Devoluciones: moonexcel.com.ua
End Sub
Si solo necesita recuperar una única subcadena (en este ejemplo, la subcadena del medio "moonexcel"), puede especificar directamente un elemento de matriz para recuperarla:
- Sub SplitExample3()
-
- text = "www.moonexcel.com.ua"
-
- middle = Split(text, ".")(1)
-
- MsgBox middle
-
- End Sub
Sub SplitExample3()
text = "www.moonexcel.com.ua"
middle = Split(text, ".")(1)
MsgBox middle 'Devoluciones: moonexcel
End Sub
La función inversa que agrupa los valores de la matriz en una fila es la función
JOIN.