VBA强制关闭受保护的项目

Question

我们用它来强制关闭在关闭Excel工作簿后仍保持打开状态的vba项目；

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    On Error Resume Next
    If Not (Application.VBE.MainWindow.Visible) Then
        Application.VBE.MainWindow.Visible = True
        Application.VBE.MainWindow.Visible = False
    End If
End Sub

在您保护项目之前，它可以正常工作。保护项目后，即使关闭Excel工作簿，项目也将再次保持打开状态。

我们唯一的解决方法是每天几次关闭所有Excel实例，以防止出现内存错误。

有什么建议吗？

Answer 1

在vba中关闭后，您是否尝试过添加“设置Application.ThisWorkbook = Nothing”？

Workbooks.Open ThisWorkbook.FullName

ThisWorkbook.Close False

Set Application.ThisWorkbook = Nothing

这帮助我解决了过去关闭工作簿后仍存在的VBA类似问题。