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