Shape/picture name in a worksheet

  • Thread starter Thread starter neta
  • Start date Start date
N

neta

Hi,

I am looking for a VB code line that will enable me to recieve into a
variable in a macro the name of a shape/picture I have inserted to the
worksheet. Usually it recieves automatic numbered name
(shape1...2...).

Thanks Neta.
 
try

Sub getshapenames()
For Each sh In ActiveSheet.Shapes
MsgBox sh.Name
Next sh
End Sub
 
Back
Top