F
Florent
Guest
Bonjour le forum,
Je voudrais mettre des étiquettes sur un graphique à bulle
j'ai bien trouvé un fil sur ce forum mais quand j'applique la macro , j'ai une erreur d'execution :
impossible de définir la propriété HasDataLabel de la classe point.
voici la macro ci dessous que j'ai integré à mon fichier
Sub labelgraph()
Dim NombrePoints As Integer
Dim i As Integer
NombrePoints = ActiveSheet.ChartObjects("Graphique 1").Chart. _
SeriesCollection(1).Points.Count
For i = 1 To NombrePoints
With ActiveSheet.ChartObjects("Graphique 1").Chart. _
SeriesCollection(1).Points(i)
.HasDataLabel = True
.DataLabel.Characters.Text = Cells(i + 1, 1)
End With
Next
End Sub
Si quelqu'un pouvait me donner un petit coup de main en m'expliquant ce qui ne va pas, cela serait super sympa . Je ne sais pas si cela est important mais je suis en excel 97
Merci d'avance
Florent
Je voudrais mettre des étiquettes sur un graphique à bulle
j'ai bien trouvé un fil sur ce forum mais quand j'applique la macro , j'ai une erreur d'execution :
impossible de définir la propriété HasDataLabel de la classe point.
voici la macro ci dessous que j'ai integré à mon fichier
Sub labelgraph()
Dim NombrePoints As Integer
Dim i As Integer
NombrePoints = ActiveSheet.ChartObjects("Graphique 1").Chart. _
SeriesCollection(1).Points.Count
For i = 1 To NombrePoints
With ActiveSheet.ChartObjects("Graphique 1").Chart. _
SeriesCollection(1).Points(i)
.HasDataLabel = True
.DataLabel.Characters.Text = Cells(i + 1, 1)
End With
Next
End Sub
Si quelqu'un pouvait me donner un petit coup de main en m'expliquant ce qui ne va pas, cela serait super sympa . Je ne sais pas si cela est important mais je suis en excel 97
Merci d'avance
Florent