Funkcja VBA Split służy do dzielenia ciągu znaków według ogranicznika w celu uzyskania tablicy wartości.
Split(tekst, separator)
Lub
Split(tekst, separator, limit)
Podzielmy nazwę witryny „www.moonexcel.com.ua” separatorem „.” aby uzyskać 4 podciągi w tablicy:
Sub SplitExample1() text = "www.moonexcel.com.ua" array = Split(text, ".") MsgBox array(0) 'Zwroty: www MsgBox array(1) 'Zwroty: moonexcel MsgBox array(2) 'Zwroty: com MsgBox array(3) 'Zwroty: ua End Sub
W razie potrzeby możesz ograniczyć liczbę elementów w tablicy:
Sub SplitExample2() text = "www.moonexcel.com.ua" array = Split(text, ".", 2) MsgBox array(0) 'Zwroty: www MsgBox array(1) 'Zwroty: moonexcel.com.ua End Sub
Jeśli chcesz pobrać tylko pojedynczy podciąg (w tym przykładzie środkowy podciąg „moonexcel”), możesz bezpośrednio określić element tablicy, aby go pobrać:
Sub SplitExample3() text = "www.moonexcel.com.ua" middle = Split(text, ".")(1) MsgBox middle 'Zwroty: moonexcel End Sub