VBA Split işlevi, bir değerler dizisi elde etmek amacıyla bir karakter dizisini sınırlayıcıya göre bölmek için kullanılır.
Split(metin, ayırıcı)
Veya
Split(metin, ayırıcı, sınır)
"www.moonexcel.com.ua" site adını "." ayırıcısıyla bölelim. bir dizide 4 alt dize elde etmek için:
Sub SplitExample1() text = "www.moonexcel.com.ua" array = Split(text, ".") MsgBox array(0) 'İade: www MsgBox array(1) 'İade: moonexcel MsgBox array(2) 'İade: com MsgBox array(3) 'İade: ua End Sub
Gerekirse dizideki öğe sayısını sınırlayabilirsiniz:
Sub SplitExample2() text = "www.moonexcel.com.ua" array = Split(text, ".", 2) MsgBox array(0) 'İade: www MsgBox array(1) 'İade: moonexcel.com.ua End Sub
Yalnızca tek bir alt dizeyi almanız gerekiyorsa (bu örnekte ortadaki alt dize "moonexcel"), onu almak için doğrudan bir dizi öğesi belirtebilirsiniz:
Sub SplitExample3() text = "www.moonexcel.com.ua" middle = Split(text, ".")(1) MsgBox middle 'İade: moonexcel End Sub