Excel 은 VBA 코드를 통해 중복이 아닌 값을 배열로 추출하는 대신 어떻게 합니까?

암담한가? 아? Brr,? Crr( 1? 어디 가? 70),? B? 로? 부울 대수학 시스템

B? =? 잘못된

암담한가? X%? X? =? 1

아르? =? ActiveSheet 입니다. 범위 (셀 (1, 1),? 세포 (70, 1))

Brr? =? ActiveSheet 입니다. 범위 (셀 (1, 2),? 세포 (70, 2))

뭐 때문에? 나? =? 1? 어디 가? UBound(arr, 1)

뭐 때문에? J? =? 1? 어디 가? UBound(brr, 1)

만약? 아르 (나,? 1)? =? Brr(j,? 1)? 그리고는요? B? =? 진실:? 종료? 을 위해

그리고 나서

만약? B? =? 가짜? 그리고는요? Crr(x)? =? 아르 (나,? 1):? X? =? X? +? 1

B? =? 잘못된

그리고 나서

ActiveSheet 입니다. 셀 (1,? 3). 크기 조정 (x? -응? 1,? 1)? =? 신청하다. 돌리다