怎么用VBA在EXCEL中解决排列组合的问题答:Cells(9, c) = Cells(2, a2)Cells(10, c) = Cells(3, a3)Cells(11, c) = Cells(4, a4)Cells(12, c) = Cells(5, a5)Cells(13, c) = Cells(6, a6)c = c + 1
请教一下,用excel中的VBA如何实现排列组合的操作?答:Dim a, b, c, d, e, f, i i = 1 For a = 1 To 12 For b = a + 1 To 12 For c = b + 1 To 12 For d = c + 1 To 12 For e = d + 1 To 12 For f = e + 1 To 12 Cells(i, 1) = a Cells(i, 2) = b Cells(i, 3) = c Cells(i, 4) = d Ce...
用excel里的宏实现 排列组合答:1) = arr(a, 1) arr1(i, 2) = arr(b, 1) arr1(i, 3) = arr(c, 1) arr1(i, 4) = arr(d, 1) arr1(i, 5) = arr(e, 1) arr1(i, 6) = arr(f, 1) Next f Next e Next d Next c Next b Next a 建议你直接运行代码理解吧(如从1~8取6,只有28个结果,相...
excel中,实现排列组合。答:For C3 = C2 + 1 To R For C4 = 1 To R For C5 = C4 + 1 To R For C6 = C5 + 1 To R rr = rr + 1 ABC = arr(C1, 1) & "," & arr(C2, 1) & "," & arr(C3, 1) & "," & arr(C4, 2) & "," & arr(C5, 2) & "," & arr(C6, 2)If rr = num...