在 Excel 2007 中编译错误打开工作簿

Compile Error Opening Workbook in Excel 2007

我有一个代码 运行 存储在 ThisWorkbook 中。原来是Private Sub Workbook_Activate和Private Sub Workbook_Deactivate。在打开的工作簿之间切换时,这会导致一些意外结果。所以我将代码更改为以下内容。只是现在,我收到一条编译错误消息(当我收到此错误消息时,Private Sub Workbook_BeforeClose 突出显示)说:

编译错误:

过程声明与同名事件或过程的描述不匹配。

我对 VBA 的了解不够,无法理解此错误消息或对其进行良好修复。欢迎所有帮助和建议。

Private Sub Workbook_Open()
    Call AddToCellMenu
End Sub

Private Sub Workbook_BeforeClose()
    Call DeleteFromCellMenu
    Call DeletePopUpMenu
End Sub

应该是:

Private Sub Workbook_BeforeClose(Cancel As Boolean)

Cancel 参数可让您防止工作簿关闭 - 例如如果没有满足某些条件。将 Cancel 设置为 True 会阻止工作簿关闭 - 请参阅 Workbook.BeforeClose documentation