配列を連結するためのマクロ

Question

私は以下のような値の配列を持っています。

array(0) = "1" 
array(1) = "2" 
array(3) = "3" 
. 
. 
. 
array(n) = "n" 

誰かが助言してくださいすることができ、私は

String = combined(array(0),array(1),.....,array(n)) 

などの文字列に追加する必要があり、配列のNの数があります。

Answer 1

あなたのN = 100（この例の場合）については、下記のコードを参照してください。

Option Explicit 

Dim ex_Array()   As Variant 
Dim i     As Integer 
Dim ans_str    As String 

Sub concen() 

ReDim ex_Array(0 To 100)  
ex_Array(0) = "1" 
ex_Array(1) = "2" 
ex_Array(3) = "3" 

For i = 0 To UBound(ex_Array) 
    ans_str = ans_str & ex_Array(i)  
Next i  
MsgBox ans_str 

End Sub 

Answer 2

あなたは全体の配列を連結したい場合は、2番目の引数が、それは= 1 2 3 ans_strを作っている区切り文字（デフォルトは" "、ない""です）