Barre d'outils

Je désire créer une barre d'outils à l'ouverture d'un fichier fichier (par macro VBA) qui me permettra de lancer d'autres macros. Je n'arrive pas à trouver les commandes dans les méandres de l'aide d'Excel.

Merci par avance

va voir dans la rubrique Lecons et exemples de ce site, tu devrais trouver ton bonheur.

Voici une réponse qu j'ai faîte qui pourrai te convenir.
Date: 30-09-02 18:06



La solution la plus propre est dans la macro Auto-open de ton fichier est de fabriqué systématiquement ta barre avec l'option "tempory".

Lorsque le fichier sera fermé la barre disparait complètement et se refabrique à l'ouverture suivante.

exemple de création:
'Initialisation
Sub auto_open()

'Création de la barre de commande temporaire
Set mabarre = CommandBars.Add(Name:="tt", Position:=msoBarFloating, temporary:=True)
mabarre.Left = 0
mabarre.Top = 50
'Bouton popup(menu)
Set pop = mabarre.Controls.Add(Type:=msoControlPopup)
pop.Caption = "Employé"
pop.Controls.Add Type:=msoControlButton
'Bouton sous-menu
pop.Controls(1).Caption = "Nouveau"
pop.Controls(1).OnAction = "newfiche"

mabarre.Visible = True

End Sub