• Initiateur de la discussion Initiateur de la discussion Han
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Merci Bruno,

J'ai déjà des instructions dans le Workbook_Open(), mais je veux y ajouter les commandes suivantes pour personnaliser le menu bar:

Set myMenuBar = CommandBars.ActiveMenuBar
Set newMenu = myMenuBar.Controls.Add(Type:=msoControlPopup, _
Temporary:=True)
newMenu.Caption = "Mon Appliaction"
Set ctrl1 = newMenu.Controls _
.Add(Type:=msoControlButton, ID:=1)
ctrl1.Caption = "Run Application"
ctrl1.TooltipText = "Run Application"
ctrl1.Style = msoButtonCaption

With ctrl1
.FaceId = 2
.OnAction = "Introduction"
End With etc ....


Mais j'obtiens un message d'erreur. ça marche dans un module indépendant et non dans le workbook???
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
15
Affichages
347
Réponses
4
Affichages
197
Réponses
7
Affichages
449
Retour