VBA Renommer entité points

[XGX4]

Bonjour,

 

Je cherche à connaitre le nom des entités et plus particulierement des points qui sont dans un Set Géometrique.

J'arrive à les compter

 

 For i = 1 To Points.HybridShapes.Count

MsgBox i

Next i

 

mais je ne vois pas comment connaitre leurs noms. C'est dans le but de renommer tous les points sous la forme Point_1 Point_2 etc.

 

Si quelqu'un peut m'aiguiller,

 

merci d'avance.

 

XGX4