如何使循环同时运行所有 X 和 Y 值，现在它运行所有 Y 值，然后运行所有 X 值答案

【问题标题】：How can I make the loop run all X and Y values at the same time, right now it runs all Y values and then all X values如何使循环同时运行所有 X 和 Y 值，现在它运行所有 Y 值，然后运行所有 X 值
【发布时间】：2018-05-11 10:36:42
【问题描述】：

它首先遍历所有 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

【问题讨论】：

标签： excel for-loop vba

【解决方案1】：

问题在于您设计循环的方式是外循环在每次运行时启动内循环。所以你需要删除那个内部循环，例如：

For x = 3 To lr + 1
    y = x - 1 // Or just change the value in the Cells-function* 
    anyl.Cells(x, 1) = efx.Cells(y, 1)
Next

*我更喜欢这样做，因为您可以更轻松地重用变量 y。

【讨论】：

【解决方案2】：

消除内循环（和y）

For x = 3 To lr + 1

    anyl.Cells(x, 1) = efx.Cells(x - 1, 1)

Next

【讨论】：