Funcția VBA Split este folosită pentru a împărți un șir de caractere conform unui delimitator pentru a obține o matrice de valori.
Split(text, separator)
Sau
Split(text, separator, limită)
Să împărțim numele site-ului „www.moonexcel.com.ua” cu separatorul „.” pentru a obține 4 subșiruri într-o matrice:
Sub SplitExample1()
text = "www.moonexcel.com.ua"
array = Split(text, ".")
MsgBox array(0) 'Returnări: www
MsgBox array(1) 'Returnări: moonexcel
MsgBox array(2) 'Returnări: com
MsgBox array(3) 'Returnări: ua
End Sub
Dacă este necesar, puteți limita numărul de elemente din matrice:
Sub SplitExample2()
text = "www.moonexcel.com.ua"
array = Split(text, ".", 2)
MsgBox array(0) 'Returnări: www
MsgBox array(1) 'Returnări: moonexcel.com.ua
End Sub
Dacă trebuie să preluați doar un singur subșir (în acest exemplu, subșirul din mijloc „moonexcel”), puteți specifica direct un element de matrice pentru a-l prelua:
Sub SplitExample3()
text = "www.moonexcel.com.ua"
middle = Split(text, ".")(1)
MsgBox middle 'Returnări: moonexcel
End Sub