OVH Cloud OVH Cloud

Afficher commentaire texte sur un graphique

1 réponse
Avatar
helloworld
Bonjour
Je cherche a créer un graphique qui afficherait au niveau de la valeur , le commentaire texte d'une cellule
Ex : Je donne des notes et des commentaires au matchs de foot que je regarde de l'equipe de france
J'ai donc 3 valeurs
La date du match de foo
La note donnée (sur 10
Et le commentaire : par ex : le nom du meilleur joueur de la parti

ex : 2005-01-15 | 8 | zidan
Afficher la courbe des dates ... je sais fair
MAis afficher, sur la courbe ,le commentaire texte .... je sais pas faire

Ca doit etre bete, mais si qq1 pouvait m'aider !!!!!!!!
Merci a tous

Franc

--
helloworld

-----------------------------------------------------------------------
Voir theme: http://www.frbox.net/viewtopic-571758.htm

Envoyé de http://www.frbox.ne

1 réponse

Avatar
JB
Bonsoir,


http://cjoint.com/?fAuRiu3fqb

Nom Ca Commentaires
Miroux 2500 Peut mieux faire
Gidel 2000 En progrès


Sub commentaire()
ActiveSheet.ChartObjects(1).Activate
On Error Resume Next
ActiveChart.SeriesCollection(1).ApplyDataLabels
Type:=xlDataLabelsShowLabel
On Error GoTo 0
ActiveChart.SeriesCollection(1).DataLabels.Select
nb_points = ActiveChart.SeriesCollection(1).Points.Count
For i = 1 To nb_points
ActiveChart.SeriesCollection(1).Points(i).DataLabel.Select
Selection.Interior.ColorIndex = 36
Selection.Font.Size = 7
Selection.Text = Sheets(1).Cells(i + 1, 3)
Next i
End Sub

JB