Application.CommandBars VBA EXCEL ne fonctionne pas

Question

Bonjour à tous,

Je souhaite rendre invisible certaines bars de commandes.

Quand je fais ce code :

Sub test()

Application.CommandBars("Status Bar").Visible = False

End Sub

Cela fonctionne bien.

Mais quand je fais la même chose avec Reviewing pour Révision ou Protection pour Protection cela ne fonctionne pas :

Sub test()

Application.CommandBars("Reviewing").Visible = False

End Sub

Pouvez-vous m'aider ?

Merci d'avance !

Answer 1

Au fait c'est pour rendre inactives certaines commandes du menu Révision et du menu Affichage, pas forcément tous les onglets

Par exemple pour le menu Développeur, je peux faire Application.ShowDevTools = False et cela marche. Y a-t-il des méthodes pour les autres onglets ?

Answer 2

Je ne sais pas comment afficher cette barre. Pour moi, ça ne concerne que les anciennes versions d'Excel. Tu ne confonds pas avec le ruban ?

Daniel

Answer 3

Quand j'essaie avec les commandes ci-dessous, rien ne fonctionne :

Answer 4

Bonjour @DanielCo et merci pour votre retour.

Cela ne marche toujours pas, tout ce qui est dans Révision reste actif.

Answer 5

Bonjour,

Essaie :

Application.CommandBars("Reviewing").Enabled = False

Daniel