how to make custom menu opened when workbook is opened

[xq]

i'm trying to add the custom menu when the workbook is opened and delete when the workbook is closed, but it doesnt' work, but macro RemoveCustomMenu() and AddCustomMenu() themselves work fine. why there codes dont' work?

Private Sub workbook_BeforeClose(Cancel As Boolean)
Call RemoveCustomMenu
End Sub

Private Sub Workbook_Open()
Call AddCustomMenu
End Sub

Public Sub RemoveCustomMenu()
........................
End Sub
Public Sub AddCustomMenu()
.........................
End Sub

 

[rmikesmith]

xq,

Questions: When you say add/delete custom menu "doesn't work", do you mean nothing happens or do you get an error? If so, what error? Are the following actually in the ThisWorkbook code module?

Private Sub workbook_BeforeClose(Cancel As Boolean)
   Call RemoveCustomMenu
End Sub

Private Sub Workbook_Open()
   Call AddCustomMenu
End Sub

Regards,
M. Smith

 

[xq]

thanks a lot, i've fixed the problem.