Try...
ActiveChart.SeriesCollection(1).Name = ActiveWorkbook.Sheets("Sheet2").Range("F2").Text
Jim Cone
San Francisco, USA
http://www.realezsites.com/bus/primitivesoftware
"Mike B in VT"
wrote in message...
I'm trying to set the Legend caption of a Chart by referencing a cell in a
different sheet but
ActiveChart.Legend.LegendEntries(1) =
ActiveWorkbook.Sheets("Sheet2").Range("F2").Value
gives me "Object doesn't Support this property or method".
Is there anyway to do this?