Berthica,

These macros should help:

Sub GetChartName()
MsgBox "The chart name is: " & ActiveChart.Parent.Name
End Sub

Sub RenameChart()
ActiveChart.Parent.Name = Chart1
End Sub

----------------------------
Regards,
John Mansfield
http://www.pdbook.com


"Berthica" wrote:

I have a lot of charts in a woorkbook and need to refer to them in my VBA. I
cannot know the names (numbers) of all the charts. mHow can I change a
chart's name so it is easy to find them ?