Personnalisation de la barre menu excel

[David]

Salut à tous,

J'ai un petit souci avec excel. Je dois mettre en place une application et pour la rendre plus confortable je souhaiterais créer ma propre barre de menu, virer FICHIER, EDITION....par BILAN, COMPTE DE RESULT....vous voyez le genre. Le problème est que lorsque je réalise la modif, elle est prise en compte pour tous mes fichiers EXCEL.

Y aurait-il un moyen d'opérer la modif juste pour un fichier ?

Merci d'avance.

 

[frédéric]

oui :
activer/desactiver tes barres d'outils à l'activation/desactivation du fichier qui t'interesse.
cdt
FL

VBA[workbook]
Private Sub Workbook_WindowActivate(ByVal Wn As Window)

'fermer les barres d'outil standard de excel
Dim cmdB As CommandBar
For Each cmdB In Application.CommandBars
cmdB.Enabled = false
Next cmdB

'activer ta barre d'outil
Application.CommandBars("ma barre d'outil").Visible = True
End Sub

Private Sub Workbook_WindowDeactivate(ByVal Wn As Window)

'désactiver ta barre d'outil
Application.CommandBars("ma barre d'outil").Visible = false

'réouvrir les barres d'outil standard de excel
Dim cmdB As CommandBar
For Each cmdB In Application.CommandBars
cmdB.Enabled = true
Next cmdB
End Sub

 

[David]

Salut Fréd,

merci pour ta réponse et surtout merci pour ta rapidité.
Je ne maitrise pas parfaitement le VB donc meme si tu m'as filé les lignes de code, j'ai bien peur d'etre un peu paumé.

N'excisterait il pas une solution plus simple ou pourrais tu tout simplement dans la démarche VB.

Thanks

 

[David]

Salut Fréd,

merci pour ta réponse et surtout merci pour ta rapidité.
Je ne maitrise pas parfaitement le VB donc meme si tu m'as filé les lignes de code, j'ai bien peur d'etre un peu paumé.

N'excisterait il pas une solution plus simple ou pourrais tu tout simplement dans la démarche VB.

Thanks