barre d'outils et bouton

  • Initiateur de la discussion Initiateur de la discussion stephane
  • 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 !

S

stephane

Guest
bonjour,

voila un bout de code pour creer une barre d'outil avec un bouton dedans.
cela marche tres bien.

toutefois je n'arrive pas à mettre un texte sur ce bouton ??? il reste toujours vide...

merci de votre aide.

'ajoute une barre d'outil avec une icone
Dim MaBarre As CommandBar
Dim MonControle As CommandBarButton
Set MaBarre = Application.CommandBars.Add("test1", msoBarTop)
Set MonControle1 = MaBarre.Controls.Add(Type:=msoControlButton, before:=1)
'msoControlButton = bouton
With MonControle1
.Caption = "texte sur le bouton" 'ne marche pas
.TooltipText = "infobulle" '(infobulle du bouton)
.OnAction = "MACRO_EXEMPLE" 'lance macro
End With
 
- 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

Discussions similaires

Réponses
2
Affichages
1 K
Réponses
2
Affichages
2 K
Retour