Come rimuovere elementi da un menu contestuale

A Diego piace utilizzare i menu contestuali che appaiono quando fa clic con il pulsante destro del mouse su una cella. Una volta che il menu contestuale è visibile, può premere un tasto di scelta rapida di qualsiasi comando desideri eseguire (il tasto di scelta rapida è la lettera sottolineata per ciascuna opzione del menu contestuale). Il problema è che il menu contestuale ha due elementi che utilizzano lo stesso tasto di scelta rapida: “Copia” e “Collega a questo intervallo”. Dato che non utilizza mai l’opzione “Collega a questo intervallo”, Diego vorrebbe eliminarla completamente, in modo che solo il comando Copia venga avviato dal tasto di scelta rapida C.

L’unico modo per modificare i menu contestuali è tramite una macro. Il codice effettivo per modificare il menu contestuale visualizzato quando si fa clic con il pulsante destro del mouse su una cella è relativamente semplice. In effetti, può essere ridotto a una macro a riga singola:

 

Sub RemoveCreateList()
    Application.CommandBars("Cell").Controls("Collega a questo intervallo").Delete
End Sub

 

 

Esegui la macro e la voce “Collega a questo intervallo” scomparirà. Puoi rimuovere qualsiasi altra voce dal menu semplicemente sostituendo il testo “Collega a questo intervallo” con il testo esatto della voce di menu che desideri rimuovere. Quando in seguito desidererai ripristinare il menu, esegui un’altra macro a riga singola ed il gioco è fatto:

 

Sub ResetMenu()
    Application.CommandBars("Cell").Reset
End Sub

 

 

 

Tags: , , , , , ,

Ti è stato utile?