Saber el nombre de un objeto que se encuentra en la fila X columna Y

Ya se el pq se han cambiado los nombres de las pictures y es pq uno de la
empresa las cambió para actualizarlas.
Y despues de averiguar esto lo dejo como lo tenia al principio que era asi:
ActiveSheet.Shapes("Picture 62").Visible = True

Muchas gracias y perdone las molestias.

"Fernando Arroyo" escribió en el mensaje
news:evb$
"Manolito" escribió en el mensaje
news:

Le explico el problema que tengo desde el principio.
Yo tenia unas imagenes dentro de unas celdas que las mostraba o no con

esta

instruccion:
ActiveSheet.Shapes("Picture 62").Visible = True

Yo primero las inserte manualmente con el comando Insertar imagen desde
archivo (Yo no inserto nunca vinculos a las imagenes)
Y parece ser que se ha cambiado los nombres de las imagenes por arte de
magia
Entonces para solucionar esto se me ha ocurrido la idea de preguntarle a

la

celda que imagen contiene y cual es su nombre.
pero tengo un problema
yo le pregunto por la fila 1 y columna 1 y me activa una imagen que esta

en

la fila 1 columna 5
Pongo esto :
QuéFormaEstáEnLaCelda(ActiveSheet.Cells(Fil & "," & 1))
A que se debe esto?
Hay alguna otra forma de arreglarlo ?
Ha que se debe que se hayan cambiado los nombres?

Yo creo que el problema está en la forma en que le pasa la celda a la
función. Pruebe sustituyendo:

(Fil & "," & 1)

por:

(Fil, 1)

Un saludo.


Fernando Arroyo
MS MVP - Excel