The Legend box needs to showing.

ActiveChart.HasLegend = True

--
Rob van Gelder - http://www.vangelder.co.nz/excel


"ojv" wrote in message
...
I'm trying it on a surface contour chart.

"Tom Ogilvy" wrote:

It worked fine for me. What type of chart are you working with?

--
Regards,
Tom Ogilvy



"ojv" wrote in message
...
The following code applied to an embedded chart in a chartsheet fails
with
error message 'Unable to get the Legendentries property of the
Legendclass'.
Error # 1004.

For Each le In ActiveChart.Legend.LegendEntries
le.LegendKey.Border.LineStyle = xlNone
Next

Any idea why?

ojv