ShapeRange.Name (Word)

Cette propriété renvoie ou définit le nom de l'objet spécifié.

Dim sre As ShapeRange: Set sre =  
sre.Name =