[已解决]循环语句出错了，为什么？

abc119297

有循环语句，在运行时，提示错误是“loop没有do”，明明有do，怎么会错呢?请老师们指教指教。
x = 1
Do
x = x + 1
For Each rg In Range("i" & x)
rg = rg.Offset(0, -7) * (1 - rg.Offset(0, -6)) * 20 / 10
Exit Do
Loop Until x = 6

最佳答案

月排行榜 / 总排行榜

zjdh

2011-10-11 18:59

For Each rg In Range("i" & x)
没有 next 对应

跳转到最佳答案楼层

zjdh

For Each rg In Range("i" & x)
没有 next 对应

abc119297

呵呵，非常感谢！

fjmxwrs

x = 1
Do
x = x + 1
For Each rg In Range("i" & x)
rg = rg.Offset(0, -7) * (1 - rg.Offset(0, -6)) * 20 / 10
Exit Do
Next
Loop Until x = 6