Функція 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