Menu di scelta rapida: nascondi tutti i pulsanti e aggiungi solo i miei pulsanti
-
02-01-2020 - |
Domanda
Sto cercando un modo per nascondere tutti i pulsanti dal menu di scelta rapida di Excel e lasciare i miei pulsanti che ho creato.
Come posso farlo?
Soluzione
Ho trovato un modo per farlo, quando ho avuto lo stesso problema ..
Se vuoi rimuovere qualsiasi articolo
Sub RemoveItems()
Application.CommandBars("Cell").Controls("Insert...").Delete
Application.CommandBars("Cell").Controls("Cut").Delete
Application.CommandBars("Cell").Controls("Copy").Delete
End Sub
.
o se vuoi eliminare tutti gli elementi, quindi
Sub DeleteAll()
Set CtrlMenu = Application.CommandBars("Cell")
For Each Item In CtrlMenu.Controls
Item.Delete
Next
End Sub
.
Se si desidera ripristinare di nuovo
Sub ResetMenu()
Application.CommandBars("Cell").Reset
End Sub
. Autorizzato sotto: CC-BY-SA insieme a attribuzione
Non affiliato a StackOverflow