Question

VBA 怎么跳出for 循环？

举例，for i= 1 to 1000
if range("b" & i).value="发货时间" then
t$=range("c" & i)
goto 20
next i
20 range("f2")=t$
这样的话，应该F2显示第一个发货时间对应得 时间，可是实际上却是最后一个怎么让得到自己想要的数据后跳出循环？？

Answer 1

goto 20 如果没有20:标识符的情况下，会跳转到第20行，所以，你的循环一直到1000了。把 20 range("f2")=t$ 修改为 20: range("f2")=t$
就可以被识别为跳出符号了。

Answer 2

代码：exit for

示例：for i=1 to 100
if i=50 then
exit for
end if
next

Answer 3

循环外部 赋值 i=0
循环内部得到值后 i=1
然后跳出的地方判断i的值 Exit For
。

Answer 4

用语句exit for来跳出for循环，这里跳出循环指的是跳出最里面一层的循环结构。
代码实例如下：
for ii = 1 to 1000
if ii = 500 then
exit for
end if
next
这里的代码表示ii从1到1000进行循环，如果ii为500时则跳出循环。

Answer 5

一般跳出循环用exit
如exit for,条件跳出使用if...then exit for