Sub 行列同时判断一般也就是行列都要循环了()
Dim i, j
i = 2
Do While Cells(i, "a") <> ""
j = 2
Do While Cells(i, j) = Cells(i, j) * 0.6
j = j + 1
Loop
i = i + 1
Loop
End Sub
Sub 行列同时判断一般也就是行列都要循环了()
Dim i, j
i = 2
Do While Cells(i, "a") <> ""
j = 2
Do While Cells(i, j) = Cells(i, j) * 0.6
j = j + 1
Loop
i = i + 1
Loop
End Sub