Foros del Web » Soporte técnico » Ofimática »

Ver imagenes en excell

Estas en el tema de Ver imagenes en excell en el foro de Ofimática en Foros del Web. BUENAS TARDES, Alguien sabe como puedo insertar o cargar una imagen en excell con una macro? lo que pasa es que tengo un formato unico ...
  #1 (permalink)  
Antiguo 13/09/2008, 18:06
 
Fecha de Ingreso: julio-2008
Mensajes: 99
Antigüedad: 15 años, 9 meses
Puntos: 1
Sonrisa Ver imagenes en excell

BUENAS TARDES,

Alguien sabe como puedo insertar o cargar una imagen en excell con una macro? lo que pasa es que tengo un formato unico de hoja de vida y quiero hacer una macro que me cargue todos los datos incluyendo la foto, se hacer la macro para ver, modificar o almacenar la informacion a partir de una tabla con los datos; pero no se como cargar la imagen. si alguien me puede ayudar estaré muy agradecido.

  #2 (permalink)  
Antiguo 13/09/2008, 18:42
Avatar de epa2  
Fecha de Ingreso: abril-2002
Ubicación: Málaga
Mensajes: 1.475
Antigüedad: 22 años
Puntos: 9
Respuesta: Ver imagenes en excell

no sé hacerlo, pero puedes utilizar el truco del almendruco.

vete a grabar macro/nueva macro.

cuando la macro se esté grabando, inserta una imagen en la hoja.
para la grabación.

pulsa la tecla ALT + F11 y podrás ver el código fuente de como se inserta una imagen en la hoja.

espero te sirva.

de todas maneras, los expertos y maestros que frecuentan por aquí mejor te aconsejan.

un saludete.
__________________

***Aprendiz de todo y maestro de nada***
  #3 (permalink)  
Antiguo 14/09/2008, 11:23
 
Fecha de Ingreso: julio-2008
Mensajes: 99
Antigüedad: 15 años, 9 meses
Puntos: 1
Respuesta: Ver imagenes en excell

Buenos dias,

Tu consejo, realmente me sirvio, le hice unos ajustes al codigo que me genero la grabadora de macros, este es el codigo:


Private Sub CommandButton1_Click()

Hoja1.Activate
Hoja1.Range("IMAGEN").Select 'en esta celda esta el nombre de la imagen.jpg
IMAGEN = ActiveCell.Text
Hoja1.Range("MARCO").Select 'en esta celda se inserta la imagen
ActiveSheet.Pictures.Insert( _
"C:\Mis documentos\Mis imágenes\" & IMAGEN _
).Select
' y el siguente ajusta el tamaño de la imagen
Selection.ShapeRange.ScaleWidth 0.09, msoFalse, msoScaleFromTopLeft
Selection.ShapeRange.ScaleHeight 0.15, msoFalse, msoScaleFromTopLeft

End Sub


Gracias epa2 y hasta la proxima.
  #4 (permalink)  
Antiguo 14/09/2008, 15:55
Avatar de epa2  
Fecha de Ingreso: abril-2002
Ubicación: Málaga
Mensajes: 1.475
Antigüedad: 22 años
Puntos: 9
Respuesta: Ver imagenes en excell

oye, interesante post que al final ha quedado.

gracias por compartir el código,, voy a guardarlo, quizás en un futuro me pueda servir,.

un saludete.
__________________

***Aprendiz de todo y maestro de nada***
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 20:20.