VBA 배열 중복 제거 후 재 할당하기

VBA에서 Collection을 이용한 중복제거 간단한 원리는 중복이 있는 배열을 반복하며 ","를 기준으로 합침 합친 후 Collection 객체를 이용하여 유니크한 항목만 추가 다시 "," 기준으로 분리하여 중복이 제거 된 내용만 배열에 새 할당 1234567891011121314151617181920212223242526Dim varSym As VariantDim vTemp As Variant ReDim vTemp(LBound(varSym, 1) To UBound(varSym, 1)) For i = LBound(varSym) To UBound(varSym) vTemp(i) = varSym(i, 1) & "," & varSym(i, 2) & "," & varSym(i, 3) & "," & varSym..

2018.12.07