1-33 에서 6 개의 숫자를 선택하는데, 그것들의 수가 다르고, 86 과 같고, N 가지의 조합이 있다. 스프레드시트와 같은 어떤 공식을 풀 수 있습니까?

Excel 에서 Alt 와 F 1 1 을 동시에 눌러 매크로 인터페이스로 이동하고 삽입 메뉴를 클릭하여 다음 코드를 붙여 넣습니다.

하위 테스트 ()

신청하다. 화면 업데이트 = false

I, j, k, l, m, n, x 를 정수로 표시합니다

X = 1

I = 1 28 까지의 경우

J = I+1 ~ 29 의 경우

K = j+1 ~ 30 인 경우

L = k+1 에서 3 1 까지의 경우

M = l+1 ~ 32 의 경우

N = m+1 ~ 33 인 경우

I+j+k+l+m+n = 86 이면

셀 (x,1) = I & ","& 존슨. ","& AMPK & amp ","& ampl & amp ","& ampm & amp ","& ampn

X = x+1

X Mod 500 = 1 이면

MsgBox(" continuous "? , vbYesNo, "Hi") = vbNo 및 Sub 종료

만약 ... 끝날거야

그리고 나서

신청하다. 화면 업데이트 = true

끝단 접합

이 인터페이스에서 F5 를 직접 눌러 이 매크로를 실행하고 잠시 후에 완성한다.