Excel/VBA creer un bouton ds graph par macro

Résolu/Fermé
trucfud - 11 août 2008 à 15:31
 sofia - 27 août 2014 à 16:19
Bonjour,

j'ai une macro qui me cree un graphique, et je voudrai qu'elle y place un bouton auquel j'associe ma macro "backToMenu"
Ma macro marche impec' pour ce qui est du graphique, mais le bouton n'apparait pas dans mon graphique.

Si vous avez des idees, je suis tout ouie.
Merci par avance
ci dessous, mon code:


ActiveChart.Shapes.AddTextbox(msoTextOrientationHorizontal, 576.04, 28.25, _
131.44, 31.79).Select
ActiveSheet.Buttons.Add(5487171.75, 269149.5, 1251642, 302925.75).Select
Selection.Characters.Text = ""
Selection.AutoScaleFont = False
With Selection.Font
.Name = "Arial"
.FontStyle = "Regular"
.Size = 10
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With

'changer nom du bouton

Selection.OnAction = "BackToMenu_Click"
ActiveChart.Shapes("Button 7").Select
Selection.Characters.Text = "back to menu"
Selection.AutoScaleFont = False
With Selection.Characters(Start:=1, Length:=12).Font
.Name = "Arial"
.FontStyle = "Regular"
.Size = 10
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
ActiveChart.ChartArea.Select
End Sub
A voir également:

2 réponses

j'ai reussi finalement, il ne falait jamais deselectionner mon bouton pke le code vba le reselectionne par son nom, ms celui ci change a chaque mise a jour, car j'effacais mes pages pour en recreer.
2
bonjour,

je voudrais savoir comment tu as fais pour créer les graphiques ? Tu as dis que tu avais une macro qui marchait bien pour ça, moi la mienne ne fonctionne que pour le premier appui, si je réappuie sur le bouton, ça bloque

Merci de m'aider
0