[VBA-E]Demande de précision sur les menus

bonjour !

je travaille sur un fichier excel
à l'ouverture de ce fichier, je souhaiterais qu'apparaisse un petit bouton dans la barre d'outil qui donnerait accès à la macro que je suis en train de préparer.

naturellement, je souhaiterais qu'il disparaisse lorsque le fichier est fermé de sorte qu'il ne puisse y avoir une confusion lorsque d'autres classeurs excel sont ouverts... :lol:

comment faire ?

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Private Sub Workbook_BeforeClose(Cancel As Boolean) Application.CommandBars(1).Controls(Application.CommandBars(1).Controls.Count).Delete End Sub   Private Sub Workbook_Open()   Dim MonBouton As CommandBarButton   Set MonBouton = Application.CommandBars(1).Controls.Add(msoControlButton) MonBouton.Style = msoButtonCaption MonBouton.Caption = "LegendeBouton" MonBouton.OnAction = "MaMacro"   End Sub

---

et si je veux, en sortant du fichier, rétablir la config d'origine, et donc supprimer mon bouton, que fais-je ?

Euh, tu as lu ce que Bidou t'as donné 8O 8O :!:

Dans ton Microsoftobject: This workbook sous la procedure
Workbook_Open()

tu utilises la fonction suivante pour faire apparaitre le petit bouton.

Code:

---

1 2	Application.CommandBars("nombarre").Controls(ID_controle).Add

---

Et pour la supprimer
dans la procedure suivante
Workbook_BeforeClose()

tu utilises la fonction suivante pour faire disparaitre le petit bouton.

Code:

---

1 2	Application.CommandBars("nombarre").Controls(ID_controle).Delete

---

Pour modifier le bouton tu utilise la methode Onaction sur l'objets commandbars.controls

Pour l'option des commandes, il ya l'aide de VBA qui est bien faite... :D

merci pour vos conseils, mon pb est résolu !!!
:lol: