cambiar imagen respecto al contenido de una celda

[hector100593]

buenas tardes me dirijo a ustedes con un inconveniente que tengo me gustarai saber como hacer por medio de vba que cambia una imagen en una celda o en un cuadro donde se pueda insertar la imagen...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[RoC]

Hector100593: Revisa el adjunto, carga la foto con el nombre ingresado en la celda E4, si esta existe en la carpeta de la ruta definida.

Cambia la variable que contiene la ruta
"D:\Proyecto...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[hector100593]

muchas gracias, me sirvió demasiado, gracias por tu aporte, saludos!!!
buenas noches

 

[hector100593]

si me sirvió solo que tengo un detalle pensé que se podía que cambie automáticamente sin ponerle el nombre, adjunto archivo para ver como es, buenas noches

 

[RoC]

hector100593: Cambia el código del archivo por este...

<i>
</i>Private Sub Worksheet_Change(ByVal Target As Range)
Dim Carpeta
Dim Foto As Variant
Foto = "D:\Proyecto Listas\Aprendizaje\Foro...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[hector100593]

ESTA PERFECTO EL CÓDIGO COMPAÑERO, PERO CREO QUE PENSÉ QUE SE MODIFICARÍA AUTOMÁTICAMENTE, ESPERO ME PUEDAS SEGUIR AYUDANDO GRACIAS, TE LO AGRADECERIA... SALUDOS..

LO EXPLICO EN EL EXCEL..

 

[RoC]

hector100593: Utiliza el evento Calculate de la hoja, borra el código anterior y pega este completo.

<i>
</i>Private Sub Worksheet_Calculate()
Dim Carpeta
Dim Foto As Variant
Foto =...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[hector100593]

gracias, muy amable, si me funciono .
se me fue escribir así, saludos!!!!
gracias....