The Name property returns or specifies the name (string) associated with a shape. If this property was not changed, an empty string is returned.
Examples:
The following VBA example gives each polygon a consecutively numbered name.
Sub Test()
Dim s As Shape
Dim n As Long
n = 1
For Each s In ActivePage.Shapes
If s.Type = cdrPolygonShape Then s.Name = "Polygon " & n: n = n + 1
Next s
End Sub