use something like
Dim cho as ChartObject
set cho=Activesheet.ChartObjects(1)
cho.name="yyy"

or use something like this (If you know the actual name)
Dim cho as ChartObject
set cho=Activesheet.ChartObjects("Chart 1")
cho.name="yyy"



Francisco Mariscal
fcomariscal at hotmail dot com

-----Original Message-----
What I write in order to Name a chart as yyy
regards
.