DataLabels.ShowLegendKey Property (Excel)
True if the data label legend key is visible. Read/write Boolean.
Syntax
expression .ShowLegendKey
expression A variable that represents a DataLabels object.
Example
This example sets the data labels for series one in Chart1 to show values and the legend key.
With Charts("Chart1").SeriesCollection(1).DataLabels
.ShowLegendKey = True
.Type = xlShowValue
End With