VBA 를 사용하여 데이터 정렬 조합을 만들 때 이 조합에서 단일 조합의 데이터 합계를 한 범위 내에 맞추려면 어떻게 해야 합니까?

1- 10, 제 이해는 0-9 이고, 10 은 0 을 포함한 배정도 값이며, 값의 기초는 0-9 조합으로 구성됩니다. 코드는 다음과 같습니다

하위 정렬 조합 ()

A = 0 ~ 9 의 경우

B = 0 ~ 9 의 경우

C = 0 ~ 9 의 경우

D = 0 ~ 9 의 경우

P = A+B+C+d

P>= 10 및 p< 가 다음 경우 = 25

K = k+1

Cells(k,1) = a & B & C & ampd

만약 ... 끝날거야

그리고 나서

그리고 나서

그리고 나서

그리고 나서

끝단 접합

테이블 a 의 열 셀 서식을 사용자 정의: 0000 으로 지정합니다. 그렇지 않으면 앞에 0 이 없습니다. 이 열에는 총 10-25 를 충족하는 8288 개의 조건이 있습니다!

첫 번째 값을 1 에서 시작하려면 for A= 1 에서 9 로 변경하십시오!