Series.DataLabels (Word)

Returns an datalabel that represents either a single data label (a DataLabel datalabel) or a collection of all the data labels for the series (a DataLabels collection).

If the series has the Show Value option turned on for the data labels, the returned collection can contain up to one label for each point. Data labels can be turned on or off for individual points in the series. If the series is on an area chart and has the Show Label option turned on for the data labels, the returned collection contains only a single label, which is the label for the area series.

DataLabels (Index)

Index: The number of the data label.

With ActiveDocument.InlineShapes(1) 
 If .HasChart Then 
 With .Chart.SeriesCollection(1) 
 .HasDataLabels = True 
 With .DataLabels 
 .ShowLegendKey = True 
 .Type = xlValue 
 End With 
 End With 
 End If 
End With