Question

用excel在15个设定的数中,产生6个数字一组的随机排列组合

用excel在已设的15个数中 产生6个数字一组的随机排列组合,请教高手怎么做?
比如:2,5,8,9,13,16,18,19,20,21,22,25,27,29,31,这15个数中产生任意6个数为一组的排列组合,有多少种可能.
不要出现这样的可能:2 ,9,13,18,25,29和25,9,18,13,29,2和29,25,18,13,9,2等等这些从大到小排列是一样的要去掉.
或者别的有没有什么软件可以做?
谢谢了,我在网上怎么也找不到答案,是不是有难度?
对不起,我没有积分

Answer 1

http://zhidao.baidu.com/question/99074525.html
看看这个类似的，我稍微给你改了下语句~~

打开一个EXCEL
按ALT+F11 组合键，打开VBA编辑器，选择这个表的名字，插入-模块。双击插入的模块。在出现的文本框中输入以下语句，然后关闭

Function ABC(arr As Range, num As Integer)
R = arr.Rows.Count
For C1 = 1 To R
For C2 = C1 + 1 To R
For C3 = C2 + 1 To R
For C4 = C3 + 1 To R
For C5 = C4 + 1 To R
For C6 = C5 + 1 To R
rr = rr + 1
ABC = arr(C1, 1) & "," & arr(C2, 1) & "," & arr(C3, 1) & "," & arr(C4, 1) & "," & arr(C5, 1) & "," & arr(C6, 1)
If rr = num Then Exit Function
Next
Next
Next
Next
Next
Next
End Function

关闭之后，
假如你的数据15个在A1:A15中，你可在任意的一个单元格中输入
=ABC($A$1:$A$15,INT(RAND()*COMBIN(15,6)))
就能随机出来一组数字了，用逗号隔开了~~

如果想都列出来，那就在任意单元格输入
=ABC($A$1:$A$15,ROW(A1)),公式往下拉就能出来了

如果不懂给你发给文件，留下邮箱~~
（这个有点难度，分能给多少给多少吧，权当帮忙了~~）

Answer 2

=COMBIN(15,6)
此函数只能够求出有5005种组合方式,但无法将这5005种组合方式一一列出来.