MACRO IMAGENES
Publicado por LUCKYTA (5 intervenciones) el 19/07/2008 22:34:49
Tengo ejemplo de macro para poner imágenes dependiendo de lo que se seleccione en determinada celda. Corre perfecto.
Mi duda es: cómo podría hacer para que hiciera eso mismo pero para muchos renglones
ejemplo: lo hace para la celda b1
cómo hacerle un bucle para que funcione cuando seleccionen y la celda b5, b8 etcétera.
les adjunto parte del código del ejemplo.....
If Not Target = [E23] Then Exit Sub
Me.Shapes("pic").Delete
ruta = ThisWorkbook.Path & "" & [E23] & ".jpg"
Set pic = Me.Pictures.Insert(ruta)
With Range("B23:B25")
Mi duda es: cómo podría hacer para que hiciera eso mismo pero para muchos renglones
ejemplo: lo hace para la celda b1
cómo hacerle un bucle para que funcione cuando seleccionen y la celda b5, b8 etcétera.
les adjunto parte del código del ejemplo.....
If Not Target = [E23] Then Exit Sub
Me.Shapes("pic").Delete
ruta = ThisWorkbook.Path & "" & [E23] & ".jpg"
Set pic = Me.Pictures.Insert(ruta)
With Range("B23:B25")
Valora esta pregunta
0