Enables the shortcut menu when the workbook is closed.
Private Sub Workbook_BeforeClose(Cancel As Boolean) Application.CommandBars("Cell").Enabled = True End Sub