loops - 退出 Excel 中的嵌套循环

Question

我正在编写以下结构的宏中有一个循环:

本书中有两个工作表。原始数据(因此是端点数据变量)和总帐(总账)表(因此是端点GL变量)

此函数中有三个 for 循环:

(1) 第一个循环迭代原始数据文件中的每条记录。
(2) 第二个循环迭代来自 REGEXP(正则表达式搜索)的已验证匹配项，
(3) 第三个循环遍历总帐并找到相应的匹配并将数据放入(使用:PUT_DATA_RANGE)到适当的位置。

这是我的意思:

伪代码:

For i = 2 To endpointData

    If SOME_TEST = True Then
        Set MATCHES = REGEXP.EXECUTE()
        For Each myMatch In MATCHES
            For j = 1 To endpointGL
                If myMatch.value = SOME_CONDITION Then
                    PUT_DATA_RANGE
                    Exit For
                ElseIf myMatch.value <> SOME_CONDITION Then
                    MsgBox ("there might be a problem")
                    ' EXIT BOTH LOOPS HERE

                    ' write handler code
            Next
            End If
        Next
    End If
Next i

现在你会注意到我对自己有一些评论。如果第三个循环在总帐中找不到匹配项，则代码当前会中断以通知用户。但是该消息框 MsgBox("there might be a Problem") 与第三个循环一起循环。我如何让Excel退出两个循环并将第一个for循环带到原始数据中的下一个可用记录？

顺便说一句，我尝试使用 Exit For 退出它，但这似乎并不完全有效。

Answer 1

我看到两个选项。

1)使用一系列 bool 值来检查外循环是否应该继续

2)使用goto语句退出内循环直接回到主程序

在这种情况下，goto 可能不会那么糟糕，因为您没有跳转到代码的完全不同的部分。只要好好记录一下...