Returns the collection of all shapes with given attribute
Object.Attributed ( attr As Attribute ) As ShapeRange