Question

想将8个数字分解成每组4个数字的不同组合，用表格怎么做？

比如12345678这8个数字，快速的分解成每组4个数字所有的排列组合（1234，1235,1236,1237,1238,2345,2346等等就这样分解），这8个数字的所有排列组合都要有，表格里面要怎么做？

Answer 1

排列数E5=(8*7*6*5*4*3*2*1)/(4*3*2*1)=1680

E2=E5/8=210    第一列数据  每一个数据重复的次数

E3=E2/7=30      第二列数据  除去前面的数后，每一个数据重复的次数

E4=E3/6=5        第三列数据  除去前面的数后，每一个数据重复的次数

                          第三列数据  除去前面的数后，每一个数据按序号重复填列

下列公式复制到1680行以下即可。

A1=IF(ROW(A1)>$E$5,"",INDEX($E$1:$L$1,INT(ROW(A210)/210)))

以下是数组公式，公式输完后，光标放在公式编辑栏同时按下CTRL+SHIFT+回车键，使数组公式生效。

B1=IF(A1="","",INDEX($E$1:$L$1,SMALL(IF(NOT($E$1:$L$1=A1)*1=0,2^8,NOT($E$1:$L$1=A1))*COLUMN(A1:H1),MOD(INT(ROW(A30)/30-1),7)+1)))

C1=IF(A1="","",INDEX($E$1:$L$1,SMALL(IF(NOT($E$1:$L$1=A1)*NOT($E$1:$L$1=B1)=0,2^8,NOT($E$1:$L$1=A1)*NOT($E$1:$L$1=B1))*COLUMN($A$1:$H$1),MOD(INT(ROW(A30)/5),6)+1)))

D1=IF(A1="","",INDEX($E$1:$L$1,SMALL(IF(NOT($E$1:$L$1=A1)*NOT($E$1:$L$1=B1)*NOT($E$1:$L$1=C1)=0,2^8,NOT($E$1:$L$1=A1)*NOT($E$1:$L$1=B1)*NOT($E$1:$L$1=C1))*COLUMN($A$1:$H$1),MOD(ROW(A5),5)+1)))