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