ShapeRange.Name (Word)

Retorna ou define o nome do objeto especificado. String de leitura/gravação.

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