Shape.Nodes (Excel)

Retorna uma coleção ShapeNodes que representa a descrição geométrica da forma especificada.

Esta propriedade se aplica a objetos Shape ou ShapeRange que representam desenhos de forma livre.

Dim shp As Shape: Set shp = Worksheets(1).Shapes(1) 
Dim snsNodes As ShapeNodes
Set snsNodes = shp.Nodes