Chart.ChartData (Word)

Retorna as informações sobre os dados vinculados ou integrados associados a um gráfico. Somente leitura ChartData.

With ActiveDocument.InlineShapes(1).Chart.ChartData 
 .Activate 
End With