请问,用EXCEL 如何实现此问题

来源:百度知道 编辑:UC知道 时间:2024/07/12 04:13:14
0、1、2、3、4、5、6、7、8、9,一共10个数字,在这10个数字中任选5个,用组合公式算出来一共有252个,请问,如果我选定任意5个数后,用EXCEL该如何把这252个自动列出来
252种组合,要如何列出这252种组合,谢谢

按下ALT+F11,插入-模块,复制下面代码到代码框中.按下F5运行.
这样A1:A252就是10个数字的组合.

Sub order()
Range("a1").Select
For a = 0 To 9
For b = 0 To 9
For c = 0 To 9
For d = 0 To 9
For e = 0 To 9
If a > b And b > c And c > d And d > e Then
ActiveCell.Value = a & b & c & d & e
ActiveCell.Offset(1, 0).Select
End If
Next
Next
Next
Next
Next
End Sub