الوظيفة VBA: Split

وصف

تُستخدم الدالة VBA Split لتقسيم سلسلة من الأحرف وفقًا لمحدد للحصول على صفيف من القيم.

بناء الجملة Split

Split (نص ، فاصل)

أو

Split (نص ، فاصل ، حد)

مثال VBA 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