grouper des lignes dans un graphique
Bonjour tout le monde,
j'avais une macro qui fonctionnait sous XL-2003 et qui ne marche plus depuis le passage sous XL-2007 (:arf:).
Cette macro consistait a ajouté des lignes dans un graphique pour ensuite les grouper afin de "créer" plusieurs abscisses.
voila le code:
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25
| Sub echellesParametres()
Sheets("graph").Activate
'enlève la légende
ActiveChart.Legend.Select
Selection.Delete
'trace les barres pour la legende
ActiveChart.Shapes.AddLine(59.24, 132.66, 542.04, 132.66).Select
ActiveChart.Shapes.AddLine(59.24, 126.52, 59.24, 132.66).Select
ActiveChart.Shapes.AddLine(542.04, 126.52, 542.04, 132.66).Select
ActiveChart.Shapes.AddLine(301.75, 126.52, 301.75, 132.66).Select
'redimensionner graphe
ActiveChart.PlotArea.Select
Selection.Width = 496
Selection.Height = 671
Selection.Left = 45
Selection.Top = 142
'groupe les 4 barres
ActiveChart.Shapes.Range(Array("Line 2", "Line 4")).Select 'l'erreur ce situe ici
ActiveChart.Shapes.Range(Array("Line 2", "Line 4", "Line 3")).Select
ActiveChart.Shapes.Range(Array("Line 2", "Line 4", "Line 3", "Line 1")).Select
Selection.ShapeRange.Group.Select |
Il me dit que l' élément portant ce nom est introuvable...
si quelqu'un a une réponse ou des informations quelconque je suis prenneur :help:
merci