Функція VBA Split використовується для поділу рядка символів відповідно до розділювача для отримання масиву значень.
Split(текст, розділювач)
Або
Split(текст, розділювач, ліміт)
Поділимо назву сайту "www.moonexcel.com.ua" з розділювачем "." щоб отримати 4 підрядки в масиві:
Sub SplitExample1()
text = "www.moonexcel.com.ua"
array = Split(text, ".")
MsgBox array(0) 'Повертає: www
MsgBox array(1) 'Повертає: moonexcel
MsgBox array(2) 'Повертає: com
MsgBox array(3) 'Повертає: ua
End Sub
При необхідності ви можете обмежити кількість елементів в масиві:
Sub SplitExample2()
text = "www.moonexcel.com.ua"
array = Split(text, ".", 2)
MsgBox array(0) 'Повертає: www
MsgBox array(1) 'Повертає: moonexcel.com.ua
End Sub
Якщо вам потрібно лише отримати один підрядок (у цьому прикладі середній підрядок "moonexcel"), ви можете безпосередньо вказати елемент масиву для його отримання:
Sub SplitExample3()
text = "www.moonexcel.com.ua"
middle = Split(text, ".")(1)
MsgBox middle 'Повертає: moonexcel
End Sub