MENÚ DE CONTEXTO: ocultar todos los botones y agregue solo mis botones
-
02-01-2020 - |
Pregunta
Estoy buscando una forma de ocultar todos los botones del menú de contextuales de Excel y simplemente dejar mis botones que creé.
¿Cómo puedo hacer eso?
Solución
encontré una manera de hacer esto, cuando obtuve el mismo problema ...
Si desea eliminar cualquier artículo
Sub RemoveItems()
Application.CommandBars("Cell").Controls("Insert...").Delete
Application.CommandBars("Cell").Controls("Cut").Delete
Application.CommandBars("Cell").Controls("Copy").Delete
End Sub
o si desea eliminar todos los elementos, entonces
Sub DeleteAll()
Set CtrlMenu = Application.CommandBars("Cell")
For Each Item In CtrlMenu.Controls
Item.Delete
Next
End Sub
Si desea restaurar otra vez
Sub ResetMenu()
Application.CommandBars("Cell").Reset
End Sub
Licenciado bajo: CC-BY-SA con atribución
No afiliado a StackOverflow