UDF

2016-07-28 9 views
1

이 개 1 차원 배열에 따라로 각 3 개 요소가 포함되어이있는 가정UDF

A 1 
2 3 
B C 
한 요소를 하나의 배열에 두 배열을 연결 않는 방법

A1 
23 
BC 

& 또는 CONCATENATE 함수를 사용하여 시트 작업에서 쉽게 수행 할 수 있지만 배열에서이를 수행하는 방법은 무엇입니까? 배열을 통해

답변

1

으로 반복하고 세 번째로 결합 : 당신은 함수를 만드는, 그것을 한 번 이상 사용하는 데 필요한 경우

Sub foooooo() 
Dim arr1() As Variant 
Dim arr2() As Variant 
Dim outArr() As Variant 
arr1 = Array("A", "2", "B") 
arr2 = Array("1", "3", "C") 

ReDim outArr(UBound(arr1)) 
For i = LBound(arr1) To UBound(arr1) 
    outArr(i) = arr1(i) & arr2(i) 
Next i 

Debug.Print Join(outArr, ",") 

End Sub 
+0

그것은 도움이 될 수 있습니다. 'Function concatArrays (arr1() as Variant, arr2() As Variant) Variant' –

+0

@MichaelRusso 나는 OP가 그렇게하도록 할 것이고, 나는 단지 개념 증명을 제공 할 뿐이다. OP에는 자신의 코드가 포함되지 않았으므로 정확히 무엇이 필요하고 어떤 유형의 산출물을 어디에 유추 할 수 있는지 정확하게 추측하기는 어렵습니다. 그래서 OP가 어떤 필요성을 도출 할 수있는 중추를 제공했습니다. –

+0

나는 당신이했기 때문에 당신이 완전한 응답을하지 않았다는 것을 의미하지는 않았습니다. 나는 다른 옵션을주고 싶었다. 이미 대답했기 때문에 다른 대답이 필요하지 않았습니다. –