superposition de graphiques
Bonjour tout le monde,
je souhaiterais avoir un seul graphique réunissant mes histogrammes et leur moyenne.
Or pour le moment j'en ai deux bien distincts que je n'arrive pas à scinder si on peut dire!
pour le moment j'obtient un histogramme avec 3 barres par x (point d'abscisse) et de l'autre 3 courbes horizontales représentant leur moyenne.
Vu le code c'est normal, mais je n'arrive pas à les mettre sur le même graphique !
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
| Sub graphique(f As Worksheet, rSource, rSource_moy As Range)
Charts.Add
ActiveChart.ChartType = xlLine
ActiveChart.SetSourceData Source:=rSource_moy
ActiveChart.Location where:=xlLocationAsObject, Name:=f.Name
Charts.Add
ActiveChart.ChartType = xlColumnClustered
ActiveChart.SetSourceData _
Source:=rSource, PlotBy:=xlColumns
ActiveChart.Location where:=xlLocationAsObject, Name:=f.Name
End Sub |
Merci de votre aide !!