Cambiare la disponibilità per le CommandBars che utilizzano VBA in Microsoft Excel
Con la macro sottostante puoi attivare o disattivare la disponibilità della barra dei menu della cartella di lavoro, della barra degli strumenti standard e di una CommandBar personalizzata.
La prima volta che si esegue la macro, il menu e la barra Standard sono disabilitati, la barra degli strumenti personalizzata è abilitata.
Alla successiva esecuzione della macro, il menu e la barra Standard sono abilitati, il CommandBar personalizzato è disabilitato.
Sub ToggleCommandBars()
Dim cbEnabled As Boolean
' get the current commandbar state
cbEnabled = Not Application.CommandBars(1).Enabled
' apply the new state to the Workbook Menu Bar
Application.CommandBars(1).Enabled = cbEnabled
' apply the new state to the Standard toolbar
Application.CommandBars("StandardOPE").Enabled = cbEnabled
' apply the new state to a custom commandbar (the oposite of the previous two)
Application.CommandBars("MyCustomCommandBar").Enabled = Not cbEnabled
End Sub