Discussion :

[dvguy]

Bonjour
Je souhaiterai à l'ouverture d'un fichier Excel, ne faire apparaitre que la barre d'outils personalisée afin que l'utilisateur n'est pas d'autres possibilité
De même, à la fermeture, je souhaiterai enlever la barre personalisée pour remettre une barre standart
Merci de votre aide

[ouskel'n'or]

Pour masquer les barres d'outils :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
For each LaBarre in Application.CommandBars
     LaBarre.Visible = False
Next

Pour rendre ta barre personnalisée visible

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.CommandBars(NomDeLabarre).Visible = True

Pour rendre visible certaines barres

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
    Application.CommandBars("Standard").Visible = True
    Application.DisplayFormulaBar = True
    Application.DisplayStatusBar = True
    Application.CommandBars("Formatting").Visible = True

Ces dernières lignes ayant été obtenues en enregistrant la macro en le faisant
A+