Series.Points (Word)
Retorna uma coleção de todos os pontos da série.
Points (Index)
Index: O nome ou número do ponto.
With ActiveDocument.InlineShapes(1)
If .HasChart Then
.Chart.SeriesCollection(1).Points(1).ApplyDataLabels
End If
End With