VBA停止执行当前循环迭代

Question

如何停止 for 循环语句当前迭代的执行？ Exit 结束整个循环的执行，我真的使用 goto 吗？

Answer 1

您通常希望在满足给定条件时跳过迭代 - 您在 VBA 中有 2 个选项：

1. 将循环体包装在 If 块中：

       For i = 1 to 100
           If SomeCondition Then
               ' interesting iterations
           End If
       Next
   

2. 使用GoTo 跳过迭代（并减少嵌套）：

       For i = 1 to 100
           If Not SomeCondition Then GoTo Skip
   
           ' interesting iterations
   
   Skip:
       Next
   

是的，GoTo 不好。但这是一种古老的语言，GoTo 确实 有合法用途——这就是其中之一。如果你保持你的代码干净并且extract the loop body into its own procedure，那么使用它应该不会有任何可读性问题。