excel 宏编程 进行 多个数列排列组合 用什么样的宏 代码 可以实现 在 E 列显示所有的组合情况

Question

如题所述

Answer 1

做出所有的组合没有多大意义……不用vba做 用公式就行了

假设你的这些组合是 0~9的十个数字组合……详细见附件

另外建议使用 随机函数 每次取一个随机三个数的组合……

Answer 2

1~9取三位的代码：

Option Explicit

Sub x()
    Dim i, j, k, x
    x = 1
    For i = 1 To 7
        For j = i + 1 To 8
            For k = j + 1 To 9
                Cells(x, 5) = i & j & k
                x = x + 1
            Next k
        Next j
    Next i
End Sub

本回答被网友采纳

Answer 3

public sub test()
rw = 1
for i1=1 to 3
for i2=1 to 3
for i3=1 to 3
range("E" & rw) = range("A" & i1) &range("B" & i2) &range("C" & i3)
rw=rw+1
next
next
next
end sub本回答被提问者采纳

Answer 4

还是算了吧。