Catalogo de imágenes en excel desde directorio
He estado leyendo varios tutoriales, pero no acabo de verlo claro, ya que no dispongo de conocimientos en VBA.
Parto de lo siguiente:
Listado de referencias + path de ubicación en PC.
Catalogo de imágenes en directorio.
Necesito lo siguiente:
Que en una hoja denominada "catalogo", pueda elegir la referencia de un producto mediante una lista y me muestre su imagen.
Y que eso se muestre "n" veces...
Es decir, quiero poder presentar varios productos en la misma hoja.
1 Respuesta
Respuesta de Luis Herrero Casares
Haz una lista desplegable en "E2", con las imágenes que quieras en la carpeta de fotos
Pega este código en la hoja:
Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Unprotect Password:="1"
On Error Resume Next
' Lista desplegable
If Target.Cells = Range("E2") Then
Foto = Range("E2").Value
Application.ScreenUpdating = False
Foto = Foto & ".jpg"
' Ruta de la carpeta de las fotos
ruta = ActiveWorkbook.Path & "\fotos\" & Foto
Me.Shapes("foto_del").Delete
Set fotografia = Me.Pictures.Insert(ruta)
' tamaño de la foto
With Range("A3:D33")
Arriba = .Top
Izquierda = .Left
Ancho = .Offset(0, .Columns.Count).Left - .Left
Alto = .Offset(.Rows.Count, 0).Top - .Top
End With
With fotografia
.Name = "foto_del"
.Top = Arriba
.Left = Izquierda
.Width = Ancho
.Height = Alto
End With
Set fotografia = Nothing
Application.ScreenUpdating = True
End If
End SubY en el directorio de la hoja pon una carpeta, fotos, y metes las fotos.
