Hi Bob, I thought the same thing but the only thing I can get the shaperange to return is the count. Even when I declare a variant anything like shpName = activesheet.selection.shaperange.name or shpName = activesheet.selection.shaperange just returns an empty variable. The other issue is that when a shape is programmed to a macro and then ran the shape does not get selected. At least from what I can tell. If someone can figure out what we can return with shaperange we might be able to do it the other way but I don't think it's possible with all the shapes having the same name. Though I could be wrong.