如何在excel里从1到15任选10个数，然后已5个数一组进行排列组合所有的组合，请高手帮忙。

来源：百度知道 编辑：UC知道 时间：2024/06/23 19:11:06
我是新手，，没有积分。：（ 请大家帮帮忙吧

给你个vba的方法，假设1到15在a1到a15内，
按alt+f11，弹出的对话框左侧，双击sheet1，弹出的代码窗考入下面代码：

Sub 五个数字的排列组合()
Dim a(), i As Integer, j As Integer, r As Integer, l As Integer, m As Integer, n As Integer
a() = [A1:A7].Value
For i = 1 To 3
For j = i + 1 To 4
For l = j + 1 To 5
For m = l + 1 To 6
For n = m + 1 To 7
r = r + 1
Cells(r, 2) = a(i, 1) & a(j, 1) & a(l, 1) & a(m, 1) & a(n, 1)
Next n
Next m
Next l
Next j
Next i
End Sub

输入完成以后点击绿色三角运行。
这个公式会在b列显示出所有可能的5个数的组合。改动Cells(r, 2)中的2可以改变输出显示的区域，2代表b列。3代表c列等等。