Try something like
Dim strNums As String
strNums = CStr(TNum(1))
For i = 2 to j ' assuming j is the number of elements in the array
strNums = strNums & ", " & CStr(TNum(i))
Next i
MsgBox(strNums)
'CStr converts the number to a string
--
TommySzalapski
------------------------------------------------------------------------
TommySzalapski's Profile:
http://www.excelforum.com/member.php...o&userid=25561
View this thread:
http://www.excelforum.com/showthread...hreadid=390757