insertar fotos

Hola,

Te mando una macro que se posiciona en la celda B5 de la
hoja activa e inserta el archivo muestra.jpg, modificala
según te convenga.


Sub Macro2()
Range("B5").Select
ActiveSheet.Pictures.Insert( _
"D:\trayectoria\Muestra.jpg"). _
Select
End Sub




wrote in message
news:

Hola,
No se como hacer esto haber si alguien me puede ayudar.

Tengo una serie de imagenes en formato jpg y necesito insertarlas en
una celda (Sin macros) de acuerdo con la referencia que aparezca en la
casilla de abajo.