Supprimer les menus

Bonjour le forum,

est il possible de supprimer l'affichage des menus d'excel via une macro?

Afin d'interdire toutes manipulations des menus d'un classeur.

Merci à vous.

Salut Vacoch,

Possible mais pas conseillé.....

Un code trouvé sur internet parmi tant d'autres:

Sub EnabledCommandBars() 
Dim x 
On Error Resume Next 
For x = 1 To Application.CommandBars.Count 
With Application.CommandBars(x) 
.Enabled = False
End With 
Next x 
End Sub 

Le code pour rétablir les menus:

Sub ResetCommandBars() 
Dim x 
On Error Resume Next 
For x = 1 To Application.CommandBars.Count 
With Application.CommandBars(x) 
.Reset 
.Enabled = True 
End With 
Next x 
End Sub 

Je n'ai pas testé, si ça plante, c un peu la merde..... donc je te laisse voir. Si pas bon, reviens, on en trouvera un nouveau...

Souri84

merci souri84 je vais tester...

Bonjour,

Quelle idée....A ne pas faire !

A lire -> Supprimer menus

Amicalement

Dan

Edit : lis aussi ici. On t'en a déjà parlé ... -> https://www.excel-pratique.com/forum/viewtopic.php?t=3607