excel自动生成派车单（excel自动生成排列组合）

您好,现在柳柳来为大家解答以上的问题。excel自动生成派车单，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。

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

　　免责声明：本文由用户上传，与本网站立场无关。财经信息仅供读者参考，并不构成投资建议。投资者据此操作，风险自担。 如有侵权请联系删除！