Question

excel数字组合问题，我想要在表格A列输入任意5个数，5选3组合，在B列会显示出这10个结果。

我想要在A列输入任意5个数，结果就在B列。如果有大神感觉有空帮忙，我还有其他的要求，可以私聊红包，谢谢啦！

Answer 1

Sub ZH()
Dim Arr As Variant, Brr(1 To 10, 1 To 1) As Variant, i As Byte, j As Byte, k As Byte, n As Integer
Arr = Range("A1:A5")
For i = 1 To 3
    For j = (i + 1) To 4
        For k = (j + 1) To 5
            n = n + 1
            Brr(n, 1) = Arr(i, 1) & "," & Arr(j, 1) & "," & Arr(k, 1)
        Next k
    Next j
Next i
Range("B1").Resize(10, 1).ClearContents
Range("B1").Resize(10, 1) = Brr
End Sub

追问

大哥

Nxet k 那里显示子过程或函数未定义。。。。。

大哥，还能看到吗