Boutons dans une CommandBar

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

PolS

XLDnaute Nouveau
Bonjour à tous,

Je fais appel à vos lumières parce que je galère un peu avec les CommandBars sous 2007:

Je génère une CommandBar avec la macro suivante:

Code:
Sub auto_open()

    Dim barre As CommandBar
    Dim bouton As CommandBarControl
    Set barre = CommandBars.Add(Name:="BarreBoutons", temporary:=True)
    barre.Visible = True
    barre.Width = 45
    
    
    Set bouton = CommandBars("BarreBoutons").Controls.Add(Type:=msoControlButton)
    '.DropDownLines = 3
    bouton.Style = msoButtonWrapCaption
    bouton.OnAction = "Macro1"
    bouton.Caption = "Tri doublons LDA"
    
    Set bouton = CommandBars("BarreBoutons").Controls.Add(Type:=msoControlButton)
    bouton.Style = msoButtonWrapCaption
    bouton.OnAction = "Macro2"
    bouton.Caption = "Concaténation LDA triée et FRD"
    bouton.Width = 1
    
    Set bouton = CommandBars("BarreBoutons").Controls.Add(Type:=msoControlButton)
    bouton.Style = msoButtonCaption
    bouton.OnAction = "Macro3"
    bouton.Caption = "Comparaison LDA/FRD"
    
    Set bouton = CommandBars("BarreBoutons").Controls.Add(Type:=msoControlButton)
    bouton.Style = msoButtonCaption
    bouton.OnAction = "Macro4"
    bouton.Caption = "Ajout données base FRD"
    
    Set bouton = CommandBars("BarreBoutons").Controls.Add(Type:=msoControlButton)
    bouton.Style = msoButtonCaption
    bouton.OnAction = "Macro5"
    bouton.Caption = "Effacer les données"
    
End Sub

La barre apparait dans l'onglet complément.

J'ai deux questions:
1/ Est-il possible de donner un intitulé à la barre autre que "Barres d'outils personnalisées"?

2/ Pour que ce soit plus lisible je voudrais mettre les boutons les uns au-dessus des autres et non côte à côte. Est-ce possible?

Merci de votre aide.
 
Re : Boutons dans une CommandBar

salut PolS,
J'ai aussi de la difficulté avec 2007 sur les menus temporaires
J'ai posé une question qlq lignes avant toi.
Je te joint un fichier de démonstration de menus que j'ai fait il y a pas mal de temps
Bien sur voir en "complément".
Celui qui t'intéresse est sous le bouton "menu flottant"
ou
"voir les icones"
Je n'arrive pas à détacher ces menus de complément!!! grrr.......
A voir si tu trouves ton bonheur.
A+
 

Pièces jointes

- 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

Retour