Series.Points (Word)

Devuelve una colección de todos los puntos de la serie.

Points (Index)

Index: El nombre o número del punto.

With ActiveDocument.InlineShapes(1) 
 If .HasChart Then 
 .Chart.SeriesCollection(1).Points(1).ApplyDataLabels 
 End If 
End With