barre d'outils

[DAniel]

Bonjour à tous le forum!

Je cherche la macro qui me permet à l'ouverture de m'afficher dans la barre d'outils uniquement la barre 'Fichier - Edition - Affichage - Insertion ... Et à la fermeture du classeur elle remettrai la configuration d'origine.

A l'ouverture du fichier j'ai donc ce code :
Application.CommandBars('Standard').Visible = False
Application.CommandBars('Formatting').Visible = False
Application.CommandBars('Control Toolbox').Visible = False
Application.CommandBars('Borders').Visible = False
Application.CommandBars('Drawing').Visible = False
Application.CommandBars('Picture').Visible = False
Application.CommandBars('PivotTable').Visible = False
Application.CommandBars('Visual Basic').Visible = False
Application.CommandBars('WordArt').Visible = False

Mais quand je je ferme le classeur et réouvre Excel, cela garde cette configuration !!!

Comment faire ?

Merci à vous!

 

[Creepy]

Bonjour le Forum, DAniel,

Alors dans la procedure :

Private Sub Workbook_BeforeClose(Cancel As Boolean)

Tu mets

Application.CommandBars('Standard').Visible = True
etc ...
end sub

@+

Creepy

 

[Daniel]

Ok Creepy! Merci pour le code! Par contre n'y à t'il pas un code qui remet la configuration qui était présente avant l'ouverture du fichier ???