Menú personalizado

hola, J.LL.R !

... menu personalizado en la barra de menu y le asigne una macro
... como quitarlo al salir y ponerlo al abrir el libro [...]

1.- escribe un procedimiento que 'borre/elimine' el boton del menu
[y la llamas en los eventos '_open' y '_beforeclore' del libro]
2.- escribe un procedimiento que 'agregue' el boton al menu
[y lo llamas SOLO en el evento '_open' del libro]
-> te expongo un ejemplo al final, usando la propiedad 'caption'
y suponiendo que lo agregaste al menu de 'herramientas' [Tools] y 'se llama'... 'Mi comando'

si cualquier duda... ¿comentas?
saludos,
hector.
en el modulo de codigo del libro [ThisWorkbook] ==Private Sub Workbook_Open()
AgregarBoton
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
EliminarBoton
End Sub
en un modulo de codigo 'normal' ==Option Private Module
Sub NuevoBoton()
EliminarBoton
With Application.CommandBars("Tools")
With .Controls.Add(msoControlButton, , , , True)
.BeginGroup = True
.Caption = "Mi comando"
.FaceId = 23
.OnAction = "NombreDeLaMacro"
End With
End With
End Sub
Sub EliminarBoton()
On Error Resume Next
Application.CommandBars("Tools").Controls("Mi comando").Delete
End Sub