............ Foro Excel
Si no lo has hecho aún: REGISTRATE!!!

Jalar imagenes de una celda de excel a otra celda

Ver el tema anterior Ver el tema siguiente Ir abajo

Jalar imagenes de una celda de excel a otra celda

Mensaje por luluwx12 el Mar Nov 20, 2012 4:26 pm

hola, necesito pasar las imagenes de una celda a otra, pero a la hora de realizar la formula me marca 0 en la celda donde quiero qe quede la imagen, utilize este codigo con un macro para importar las imagenes
Código:

Option Explicit
Private Sub CmdImportarImagenes_Click()
Dim NombreImagen As String
Dim fila As Integer

NombreImagen = Dir("C:\Imagenes\*.jpg")
 fila = 2
 
 Do Until NombreImagen = ""
 

Range("B" & fila).Select
Selection.RowHeight = 30

ActiveSheet.Pictures.Insert("C:\Imagenes\" & NombreImagen).Select

Selection.ShapeRange.LockAspectRatio = False
Selection.ShapeRange.Height = 30
Selection.ShapeRange.Width = 30


Range("A" & fila) = NombreImagen

fila = fila + 1
NombreImagen = Dir
Loop

End Sub
qiero darles valor a las imagenes en mi BD y despues jalar la imagen a mi tabla para qe muestre con la imagen a que hora empiezan a trabajar mis tecnicos, espero me ayuden grax.

luluwx12

Femenino Cantidad de envíos : 1
Edad : 27
Ciudad - Pais : mexico
Version de Excel : excel 10
Fecha de inscripción : 20/11/2012

Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba


 
Permisos de este foro:
No puedes responder a temas en este foro.