Hello all...
I have a chart where I am taking a column of data and creating a chart...
along that column certain cells have Comments inserted with the little red
arrow in corner to designate a comment is in that cell.
Is it possible to have either the entire comment or just an arrow or some
sort of symbol placed on a chart?
Thank you,
Shhhh
JB - 09 Jul 2007 07:21 GMT
Hello,
http://boisgontierjacques.free.fr/fichiers/graphe/GrapheCommentaire3.xls
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, 2).Comment.Text
Next i
End Sub
JB
http://boisgontierjacques.free.fr/
> Hello all...
>
[quoted text clipped - 7 lines]
> Thank you,
> Shhhh