VBA调用模块-如果模块出现故障，则中止处理

我对VBA模块有问题

我的代码如下所示：

Sub MainFunction()
    Call Module1
    Call Module2
    Call Module3
End Sub

如果Module2失败，则不应再执行Module3。我怎样才能做到这一点

感谢您的帮助

Sub main function（）
Sub MainFunction()
    Call Module1
    On Error Resume Next
    Call Module2
    If Err.Number<>0 Then Exit Sub
    On Error GoTo 0
    Call Module3
End Sub

呼叫模块1
出错时继续下一步
调用模块2
如果错误号为0，则退出子系统
错误转到0
调用模块3
端接头

call语句不再需要，因此您可以将其删除。您的“Module1”和“module2”应转换为返回真布尔值或假布尔值的函数，具体取决于它们是否失败。然后，如果模块出现故障，您可以测试并退出主子模块。e、 g.“如果不是模块2，则退出Sub”好的，非常感谢。我改变了它。现在工作很好。