딕셔너리대체1 [VBA] 딕셔너리 배열로 대체하기 딕셔너리를 두고 자꾸 왜 뻘짓을 하는지... 딕셔너리를 대체하는 배열을 만들어 보았다... 데이터가 많으면 컴이 뻗어 버린다.... 딕셔너리 열심히 하자... Option Explicit Sub Haja_딕셔너리_대체() Dim vall: vall = Range([c3], [c3].End(2).End(4)) '= 영역설정 Dim Va, Vresult() '= 결과 배열과 개체순환배열 Dim Str '= 배열의 index 위치값 Dim n&, i&, r&: r = 1 '= 결과 배열과 전체배열의 반복 변수 Dim Cmax&: Cmax = 2 '= 결과 배열의 전체 열너비 크기 [j2].CurrentRegion.Clear '= 초기화 ReDim Vresult(1 To UBound(vall, 1), 1 To .. 2022. 4. 8. 이전 1 다음