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