它首先遍历所有 y 值，然后遍历所有 x 值。我需要 X 和 y 同时改变。
For x = 3 To lr + 1
For y = 2 To lr
anyl.Cells(x, 1) = efx.Cells(y, 1)
Next y
Next x
最佳答案
消除内循环(和 y)
For x = 3 To lr + 1
anyl.Cells(x, 1) = efx.Cells(x - 1, 1)
Next
关于excel - 如何使循环同时运行所有 X 和 Y 值，现在它运行所有 Y 值，然后运行所有 X 值，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/47523646/