Chart.Shapes (Word)

Devuelve una colección que representa todas las formas de la hoja de gráfico.

Dim shpsShapes As Shapes
Set shpsShapes = ActiveDocument.Background.Chart.Shapes