msww.net
当前位置:首页 >> VBA 怎么跳出For 循环? >>

VBA 怎么跳出For 循环?

用语句exit for来跳出for循环,这里跳出循环指的是跳出最里面一层的循环结构。 代码实例如下: for ii = 1 to 1000 if ii = 500 then exit for end if next 这里的代码表示ii从1到1000进行循环,如果ii为500时则跳出循环。 扩展资料: 通过一段V...

Sub 提前退出循环() Dim i As Integer Dim sum As Integer For i = 1 To 10 sum = sum + i If sum > 20 Then Exit For '满足条件提前结束for循环 End If Next i MsgBox "i=" & i & " sum= " & sum End Sub Sub 提前进行下一次循环() Dim i As In...

在内层循环的语句里面加Exit For就行了,前提当然是内循环也是For循环,其他循环类似。

第1层循环改用其他方式如何?如do……loop循环,不过是稍微变一下条件。 j=3 do until j>m For i = 3 To n …… next j=j+1 loop 这样如果要跳出,可以用exit for或exit do来决定到底跳出哪层

For i=1 to 6 If i=3 Then Exit For ..... 以上代码片段表示:如果i的值为3,则退出for循环。

如果要跳到外层循环的话,必须先结束内层循环, 可以用exit for语句结束内层循环: if .... then next end if VBA for循环是一种重复控制结构,它允许开发人员有效地编写需要执行特定次数的循环。

加个IF,就可以了, 例 FOR I=1 TO 40 IF 条件 THEN GOTO 100:跳出100:那开始执行

可以用exit for 或者goto语句来跳出循环啊,下面示例: for i=1 to 10000 if cells(i,1)="合计" then exit for end if next

VBA中没有continue和break,循环的终止通过exit do或exit for实现,范例如下: 1、for语句: s=0for i=1 to 100s=s+iif s>100 thenexit for '强制退出for循环end ifnext i 2、do语句: s=0do while trues=s+iif s>100 thenexit do '强制退出do...

不一定每次都有结果,得多次运行 Sub cc() Dim e1, e2, a, i a = 0.5 e1 = Rnd e2 = Rnd * -1 For i = 1 To 10 a = e1 * 1 + e2 + a If a < 0 Then MsgBox a Exit Sub End If Next i MsgBox "未找到结果"End Sub

网站首页 | 网站地图
All rights reserved Powered by www.msww.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com