Chart.HasDataTable (Word)
True si el gráfico tiene una tabla de datos.
With ActiveDocument.InlineShapes(1)
If .HasChart Then
With .Chart
.HasDataTable = True
With .DataTable
.HasBorderHorizontal = False
.HasBorderVertical = False
.HasBorderOutline = True
End With
End With
End If
End With