Excel排列组合公式33选6(excel怎么排列组合求和公式)

大家好,小活来为大家解答以上的问题。excel如何使用排列组合函数，excel排列组合函数这个很多人还不知道,现在让我们一起来看看吧！

1、给你VBA代码吧因为一共有54740个结果可能等一下才看到结果的电脑用了1分半时间Dim r As LongFunction PmtSb(ByVal s As String, ByVal t As String, ByVal n As Integer) As StringConst k = 2If n < 0 Or Len(s) < n * k Then Exit FunctionIf n = 0 Thenr = r + 1Cells(r, 4) = "A" & Left(t, 2) & "B" & Mid(t, 3, 2) & "C" & Mid(t, 5, 2)Exit FunctionEnd Ifp = ""For i = 1 To Len(s) Step kp = p & PmtSb(Left(s, i - 1) & Mid(s, i + k), t & Mid(s, i, k), n - 1)NextPmtSb = pEnd FunctionSub p70_3() ‘运行这个子程序s = ""For i = 1 To 70s = s & Left(i & " ", 2)NextPmtSb s, "", 3End Sub。

本文到此分享完毕，希望能帮助到大家。