Dizi elamanlarını sıralı olarak metin ifadesine dönüşme

[tamer42]

Merhaaba,

Aşağıdaki dizi elamanlarını (vCustom1) araları vigül ile ayrılmış olarak yan-yana metin haline (sSort1) getirmenin pratik bir yöntemi var mıdır?

    Dim vCustom1 As Variant
   Dim sSort1 As String

    vCustom1= Array("Green", "Yellow", "Red", "Blue", "Black")

  sSort1 = "Green, Yellow, Red, Blue, Black"

teşekkürler,
iyi Çalışmalar.

 

[Muzaffer Ali]

Merhaba.

sSort1 =join(vCustom1,", ")