Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

BeforeClose event is used to delete a custom menu

Private Sub Workbook_BeforeClose(Cancel As Boolean)     Dim cbWSMenuBar As CommandBar     On Error Resume Next     Set cbWSMenuBar = Application.CommandBars("Worksheet menu bar")     cbWSMenuBar.Controls("MrExcel Programs").Delete End Sub