menu personalisé

[momo]

Bonsoir à tous et à toutes
A l'ouverture d'un classeur je désirerais créer un menu personalisé.
j'utilise l'expression suivante:
Application.CommandBars("Worksheet Menu Bar").Controls.Add Type:= _
msoControlPopup, Before:=11
Le menu a l'air d'être créé, mais je ne connais pas l'expression pour donner un titre au menu.
Actuellement lorsque le classeur s'ouvre, le menu n'a pas de titre.
quelqu'un pourrait il m'aider ?
De plus, quelle serait l'expression pour mettre également un bouton de commande dans ce menu.
Merci d'avance.

 

[Dan]

Bonsoir Momo,

Voici une instruction pour créer une barre de menu appelée "perso"

Dim mybar As CommandBar
Set mybar = CommandBars.Add(Name:="perso", Position:=msoBarTop, temporary:=True)

Espérant avoir répondu à ce que tu cherches.

Bon travail

@+

Dan

 

[Dan]

Momo,

Voir suite dans ce post : <http://www.excel-downloads.com/html/French/forum/messages/1_60179_60179.htm>

@+

Dan