excel - Excel VBA : How to stop program and return to certain step in code, 'bypassing modal limitations of MsgBox'

Question

我有一个用户界面，用户可以在其中输入一些信息。然后，他们按下按钮以生成报告。但是，在生成报告时，用户不能使某些文件处于打开状态。如果用户让文件保持打开状态，我希望 pop 一条错误消息以通知他们。然后，我想为用户提供一种解决问题的方法(关闭文件)，而不必在已输入信息的情况下重新启动程序。

我 pop 了MsgBox:

Do While IsFileOpen(wfileName)
    MsgBox "Please close the Weights Machine Data Excel File '" & getFileName(wfileName) & "' to proceed", vbInformation, "Error"

Loop

问题是一旦出现错误消息，用户将无法执行任何操作。我知道 MsgBox是模态的，但是有一种解决方法。如果不是，我希望用户在按下 generateReport按钮之前返回到该点，因此他们不必重新输入他们输入的任何信息。我该如何解决呢？

Answer 1

我的回答可能更适合作为评论而不是答案-但是我还没有足够的声誉....

为什么不直接在generateReport按钮的click事件中调用IsFileOpen(wfileName)呢？如果是真的，则显示您的消息，然后退出“退出”。