您好,今天蔡哥来为大家解答以上的问题。excel自动生成排列组合7组数字，excel自动生成排列组合相信很多小伙伴还不知道,现在让我们一起来看看吧！

1、Sub musub()    Dim caseArray(3) As String    caseArray(0) = "A"    caseArray(1) = "B"    caseArray(2) = "C"    caseArray(3) = "D"    Dim rowNum As Integer    For i = 1 To 4        For j = 1 To 4            For k = 1 To 4                For l = 1 To 4                    rowNum = rowNum + 1                    Cells(rowNum, 1) = "情形" & CStr(rowNum)                    Cells(rowNum, 2) = caseArray(i - 1)                    Cells(rowNum, 3) = caseArray(j - 1)                    Cells(rowNum, 4) = caseArray(k - 1)                    Cells(rowNum, 5) = caseArray(l - 1)                Next l            Next k        Next j    Next iEnd Sub。

本文就为大家分享到这里，希望小伙伴们会喜欢。