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