LegendKey.Format (Word)

Devuelve la línea, relleno y efecto de formato para el objeto.

Dim cftFormatted As ChartFormat
Set cftFormatted = ActiveDocument.Background.Chart.Legend.LegendEntries(1).LegendKey.Format