Series.Values (Word)

Devuelve o establece una colección de todos los valores de la serie.

El valor de esta propiedad puede ser la dirección de un rango de la hoja de cálculo de un gráfico o una matriz de valores constantes, pero no una combinación de ambos.

With ActiveDocument.InlineShapes(1) 
 If .HasChart Then 
 .Chart.SeriesCollection(1).Values = "=Sheet1!B2:B5" 
 End If 
End With