vba - 终止宏在验证时进一步执行

Question

我有一个从多个方法调用的method-A()，

根据方法 A 中的条件，我必须终止宏。

我看到一个选项是Exit sub，但这只会退出当前的sub ie:method-A()，而剩余的程序将继续。

如何处理这个问题。

Sub mainMethod()
    method-A()
end Sub

Sub method-A()
    if (true) Then
         'Terminate the macro. that is exit method-A() and also mainMethod()
end Sub

Answer 1

评论后编辑: 只需在要终止所有代码的地方使用 end 即可。

Sub mainMethod()
    method_A()
end Sub

Sub method-A()
    if (true) Then End
         'Terminate the macro. that is exit method-A() and also mainMethod()
end Sub

原答案:如果你想退出 main 方法，只需将 methodA 设为一个函数，并将该函数返回为 FALSE，代码如下:

Sub mainMethod()

    'Run the custom function and if it returns false exit the main method
    If Not method_A Then Exit Sub

    'If method_A returns TRUE then the code keeps going
    MsgBox "Method_A was TRUE!"

End Sub

Function method_A() As Boolean
    Dim bSomeBool As Boolean

   'Code does stuff
   bSomeBool = True

   'Check your condition
   If bSomeBool Then
       'Set this function as false and exit
       method_A = False
       Exit Function
   End If

    'If bSomeBool = False then keep going
End Function