如何在excel中从1到11中选择5个数，然后将所有的组合以5个数为一组进行排列组合，请高手帮忙。

子宏1()

Dim Arr1(1到5)，Arr2(1到120，1到5)

使不规则化

对于i = 1到5

arr 1(I)= Int(Rnd * 11+1)

然后

a = 1

对于i = 1到5

对于j = 1到5

如果j = i，那么

其他

对于k = 1到5

如果k = i或k = j，则

其他

对于l = 1到5

如果l = i或l = k或l = j，则

其他

对于m = 1到5

如果m = i或m = j或m = k或m = l，则

其他

Arr2(a，1) = Arr1(i)

Arr2(a，2) = Arr1(j)

Arr2(a，3) = Arr1(k)

Arr2(a，4) = Arr1(l)

Arr2(a，5) = Arr1(m)

a = a + 1

如果…就会结束

然后

如果…就会结束

然后

如果…就会结束

然后

如果…就会结束

然后

然后

范围(单元格(1，" A ")、单元格(120，" E")) = Arr2

末端接头