Excel应用程序赢得'；在签入sharepoint后无法退出

我在签入sharepoint后退出excel应用程序时遇到问题。我在thisworkbook模块中有以下代码：

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Application.EnableEvents = False
    Application.ScreenUpdating = False
    ThisWorkbook.Save

    If Workbooks.Count < 2 Then
        Application.Quit
    Else
        ThisWorkbook.Close
    End If

    Application.DisplayAlerts = True
    Application.ScreenUpdating = True
    Application.EnableEvents = True

    If ThisWorkbook.CanCheckIn Then
        ThisWorkbook.CheckIn
    Else
        MsgBox ("This workbook cannot be checked in.")
    End If
End Sub

Private子工作簿\u关闭前（取消为布尔值）
Application.EnableEvents=False
Application.ScreenUpdating=False
此工作簿。保存
如果是工作簿，则计数<2
申请，退出
其他的
此工作簿。关闭
如果结束
Application.DisplayAlerts=True
Application.ScreenUpdating=True
Application.EnableEvents=True
如果这个工作簿是.CanCheckIn，那么
ThisWorkbook.CheckIn
其他的
MsgBox（“无法签入此工作簿”）
如果结束
端接头

文件已成功签入sharepoint。工作簿已关闭，但excel应用程序仍在运行。如何终止申请

谢谢

Application.Quit

---

我们应该做到这一点。当您想关闭Excel时添加该选项。

我遇到了类似的问题，我发现了一个关于导致Excel实例无法退出的原因的快速讨论

这里有一个绝对糟糕的方法来避免必须正确地编码

---

url需要某种描述。