VBA 코드는 사전의 사용법을 설명합니다

데이터 어둡게, 온도, 배열

암담하다

어두컴컴한 I & AMPK & amp

Set d = createobject ("스크립트". 사전) 을 클릭하여 사전을 만듭니다.

데이터 = [a1]. CurrentRegion 은 A 1 이 있는 영역을 배열에 씁니다.

For I = 2 to ubound (data)' 배열을 순환합니다.

데이터 (I, 1) 및 ""= data(I, 2)' 배열에 데이터 (I, 1) 배치&"사전 쓰기 및

그리고 나서

Temp = [d1] 입니다. CurrentRegion 은 d 1 이 있는 영역을 임시 배열에 씁니다.

Redimar(2 에서 Ubound(temp), 1 에서1)' 배열 arr 의 크기를 재정의합니다.

K = 2 ~ ubound (temp)' 의 경우 배열을 순환합니다.

Arr(k, 1)= d(temp(k, 1))' 사전을 d(temp(k,/kloc-0) 에 대응

그리고 나서

[E2]. Resize(ubound(arr)- 1,1) = arr' 배열 arr 을 셀로 출력합니다.

설정 d = 없음

끝단 접합