Chart.DataTable (Word)

Retorna a tabela de dados do gráfico. DataTable somente leitura.

With ActiveDocument.InlineShapes(1) 
 If .HasChart Then 
 .Chart.HasDataTable = True 
 .Chart.DataTable.HasBorderOutline = True 
 End If 
End With