الوظيفة VBA: Join

وصف

تقوم الدالة VBA Join بتجميع قيم الصفيف في سلسلة أحرف ، باستخدام (أو لا) محددًا.

بناء الجملة Join

Join (text)

أو

Join (نص ، محدد)

مثال VBA Join

دعونا نجمع عناصر المصفوفة للحصول على كل قيمها في سطر واحد ، والذي سيتم فصله بعلامة "/":

Sub JoinExample1()
    
     array = Array("example", "test", 123, "xlp")
    
     text = Join(array, "/")
    
     MsgBox text 'العوائد: exampletbl _ / _ tbltest / 123 / xlp
    
End Sub

إذا لم تحدد محددًا ، فسيتم فصل القيم افتراضيًا بمسافة:

Sub JoinExample2()
    
     array = Array("example", "test", 123, "xlp")
    
     text = Join(array)
    
     MsgBox text 'العوائد: example test 123 xlp
    
End Sub