Ajouter des boutons dans l'onglet Compléments du Ruban

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 !

libellule85

XLDnaute Accro
Bonsoir le forum,

Après maintes recherches vaines, je me tourne vers vous pour essayé de résoudre mon petit problème.
Voilà, je voudrais rajouter des boutons dans l'onglet Compléments du Ruban en utilisant Custom UI Editor. Je sais faire pour créer un nouvel onglet et mettre des boutons à l'intérieur mais pas pour compléter l'onglet Compléments.
Merci beaucoup pour votre aide
 
Re : Ajouter des boutons dans l'onglet Compléments du Ruban

Bonjour,

En VBA

Code:
Sub CreeBouton()
   Dim barre As CommandBar
   Dim bouton As CommandBarControl
   On Error Resume Next
   Set barre = CommandBars.Add(Name:="BarreBoutons")
   barre.Visible = True

   Set bouton = CommandBars("BarreBoutons").Controls.Add(Type:=msoControlButton)
   bouton.Style = msoButtonIconAndCaption
   bouton.TooltipText = "xxx"
   bouton.OnAction = "Macro1"
   bouton.Caption = "Macro1"
   
   Set bouton = CommandBars("BarreBoutons").Controls.Add(Type:=msoControlButton)
   bouton.Style = msoButtonIconAndCaption
   bouton.TooltipText = "xxx"
   bouton.OnAction = "Macro2"
   bouton.Caption = "Macro2"
End Sub

Sub macro1()
  MsgBox "macro1"
End Sub

Sub macro2()
  MsgBox "macro2"
End Sub

Les barres d'outils et menus

JB
 
Dernière édition:
- 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
11
Affichages
2 K
Retour