Ajout bouton non-contextuel dans "Worksheet menu bar"

Question

Bonjour,

Je vous écris parce que ca fait un moment (plusieurs jours ...) que je cherche la solution mon probleme de menu contextuel. 

C'est une macro (onechart) qui met en forme un graphique excel. Malheureusement avec le code ci dessous mon menu est contextuel et disparait quand je selectionne un graphique dans excel. C'est certainement le type de contrôle lors de l'ajout qui devrait être msoControlgraphicPopup au lieu de msoControlPopup mais malheureusement ça ne marche pas (erreur execution 5).

Est ce que vous auriez une idée ? 

Merci bcp !

Set barre = Application.CommandBars("Worksheet Menu Bar").Controls.Add(msoControlPopup, , , , True)
    barre.Caption = "Charts"
    barre.Visible = True
    barre.Enabled = True

   With barre.Controls.Add(msoControlButton)
     .BeginGroup = True
     .Caption = "1 chart / page"
      .OnAction = "OneChart"
   End With

CTAC · Answer

Bonjour,

Essayer avec Application.CommandBars("Chart Menu Bar")

ctac

Cyt7500 · Answer

AHHhhhhhhhhhh 

Merci ctac je savais que c'etait un truc à la con ... (c'est souvent la dessus qu'on perds le plus de temps)

Ajout bouton non-contextuel dans "Worksheet menu bar"

2 réponses

Votre réponse

Discussions similaires