pedrovarela
10-24-2008, 08:58 AM
Hi,
I have a sheet with a graph/chart called "chart1" with 8 points/bubbles that I would like to name with a data label. Can you help me please?
The graph exists with the default name "chart1" and the data labels are on B10:B15.
Sub assign_Names()
For i = 10 To 15
Chart1.SeriesCollection.Select
With Chart1.SeriesCollection(i)
.Name = ActiveSheet.Cells(i, 2).Value
End With
Next i
End Sub
Thanks!
I have a sheet with a graph/chart called "chart1" with 8 points/bubbles that I would like to name with a data label. Can you help me please?
The graph exists with the default name "chart1" and the data labels are on B10:B15.
Sub assign_Names()
For i = 10 To 15
Chart1.SeriesCollection.Select
With Chart1.SeriesCollection(i)
.Name = ActiveSheet.Cells(i, 2).Value
End With
Next i
End Sub
Thanks!