Manually, select your wordart and you should see its name in the Names box
to the left of the Input bar. Just type your new name in the name box while
the shape is selected.

With code,
Activesheet.Shapes("WordArt 32").Name = "myWordArt"

If you have just added the wordart and haven't changed the 'Order' of any
shapes, you could do this -

With ActiveSheet.Shapes
..Item(.Count).Name = "myWordArt"
End With

With both the above, you'll get an error if another shape exists with the
new name.

Regards,
Peter T

"Mike D." wrote in message
...
Peter:

How do I go about naming this? When I select it, go to Insert, Name,
Define
- it shows the name of the word art in the "Refers to" section. It won't
allow me to delete, rename, or add ...

Thanks for your help!

Mike.

"Peter T" wrote:

Rename "WordArt 32" on your original sheet, eg "myWordArt". Then when
you
copy it to another sheet it's name should persist. Be aware, doing that
you
can end up with multiple shapes on the sheet with the same name.

Regards,
Peter T


"Mike D." wrote in message
...
I have a wordart ("WordArt 36") that is referenced in a macro.

When I copy the worksheet to another worksheet, the name of this
changes
to
"WordArt 32"

Is there a way to copy the worksheet so that the name of the images
stay
the
same?

Or, is there a way to rename the wordart to the previous name?