For a = 1 To 5For b = a + 1 To 6For c = b + 1 To 7For d = c + 1 To 8For e = d + 1 To 9For f = e + 1 To 10Cells(r,1) = aCells(r,2) = bCells(r,3) = cCells(r,4) = dCells(r,5) = eCells(r,6) = fr = r + 1Next f,e,d,c,b,aEnd ...
For a = 1 To 5For b = a + 1 To 6For c = b + 1 To 7For d = c + 1 To 8For e = d + 1 To 9For f = e + 1 To 10Cells(r,1) = aCells(r,2) = bCells(r,3) = cCells(r,4) = dCells(r,5) = eCells(r,6) = fr = r + 1Next f,e,d,c,b,aEnd ...
For b = a + 1 To 6For c = b + 1 To 7For d = c + 1 To 8For e = d + 1 To 9For f = e + 1 To 10Cells(r,1) = aCells(r,2) = bCells(r,3) = cCells(r,4) = dCells(r,5) = eCells(r,6) = fr = r + 1Next f,e,d,c,b,aEnd Sub 解析看不懂?免费查看...