auto open et saut de ligne !!

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

bigs32

XLDnaute Junior
bonjour
j'aimerais savoir comment faire un saut de ligne avec auto_open car le menu long sur une seule ligne ca devient illisible.
merci d'avance
Sub auto_open()
Dim barre As CommandBar
Dim bouton As CommandBarControl
On Error Resume Next
CommandBars("Feuil1").Delete
Set barre = CommandBars.Add(Name:="Feuil1")
barre.Visible = True

Set bouton = CommandBars("Feuil1").Controls.Add(Type:=msoControlButton)
bouton.BeginGroup = True
bouton.Style = msoButtonCaption
bouton.OnAction = "formule_genere"
bouton.Caption = "formule_genere"

Set bouton = CommandBars("Feuil1").Controls.Add(Type:=msoControlButton)
bouton.BeginGroup = True
bouton.Style = msoButtonCaption
bouton.OnAction = "cmd_formule_genere"
bouton.Caption = "cmd_formule_genere"


Set bouton = CommandBars("Feuil1").Controls.Add(Type:=msoControlButton)
bouton.BeginGroup = True
bouton.Style = msoButtonCaption
bouton.OnAction = "activer_filtre"
bouton.Caption = "activer_filtre"

Set bouton = CommandBars("Feuil1").Controls.Add(Type:=msoControlButton)
bouton.BeginGroup = True
bouton.Style = msoButtonCaption
bouton.OnAction = "copie_vers_feuil1"
bouton.Caption = "copie_vers_feuil1"
Set bouton = CommandBars("Feuil1").Controls.Add(Type:=msoControlButton)
bouton.BeginGroup = True
bouton.Style = msoButtonCaption
bouton.OnAction = "couleur_si_qty"
bouton.Caption = "couleur_si_qty"
End Sub
 
- 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
3
Affichages
582
Retour