工具栏在Workbook_BeforeClose中删除，但如果用户单击“取消”，则不会重新显示

Question

我有一个自定义工具栏，它是在Workbook_BeforeClose事件中打开和删除工作簿时创建的。 但是，如果随后提示用户保存文件(在关闭之前(并单击"取消"，则文件不会关闭，但我无法弄清楚如何自动重新创建工具栏。

此时是否有任何事件会触发，我可以从中调用代码来创建工具栏？

Answer 1

你必须评估

取消属性。

如果用户单击"取消"，则"取消"属性将设置为 true。

您的代码将如下所示：

Private Sub Workbook_BeforeClose(Cancel As Boolean)
     If Cancel = True Then
         'Do something on cancel
     Else
         'Do something when not cancelled
     End if
End Sub

或者，您可以仅在取消为假时才进行检查，并且仅在这种情况下删除工具栏。

如果这不能满足你的需求，则可以将代码添加到 AfterSave 方法并检查 Success 属性。