I am trying to Join a 2 dimensional array into a string with comas as
deliminators in VB on excel... ie. mystring=join(multiarry)

multiarry being a 2 dimentional array

Hi

See this example:

Sub JoinData()
Dim MyArray(1 To 2, 1 To 10)
Dim MyString As String

For r = 1 To 2
For c = 1 To 10
MyArray(r, c) = r * c
Next
Next

For c = LBound(MyArray, 1) To UBound(MyArray, 1)
For r = LBound(MyArray, 2) To UBound(MyArray, 2)
If MyString = "" Then
MyString = MyArray(c, r)
Else
MyString = MyString & ", " & MyArray(c, r)
End If
Next
Next
Debug.Print MyString
End Sub

Hopes it helps

Per

"MK" <(E-Mail Removed)> skrev i meddelelsen
news43547CC-0A3A-49CD-AFD5-(E-Mail Removed)...
>I am trying to Join a 2 dimensional array into a string with comas as
> deliminators in VB on excel... ie. mystring=join(multiarry)
>
> multiarry being a 2 dimentional array
>