Paso3. Leer ean que puede estar contenido en el nombre de las fotos, junto otras descripciones
Siguiendo la macro que me está construyendo amablemente Dante Amor,
Paso 2. Poner foto en Macro, una la lado de otra por familias
La siguiente pregunta seria.
Se han de leer las fotos para ir incluyendo en el listado, pero su nombre contiene el ean, pero además, puede contenener otras descripciones (además del ean). Pero solamente el ean es lo que nos sirve, pues está en el listado en excel como variable para encontrar la foto en la carpeta.
Por ejemplo
ean = 8414356121036, que está en el excel
nombre archivo = "ARMONIA 8414356121036 VIDREhojiblanca"
¿Cómo iría la cuestión?
1 Respuesta
Respuesta de Dante Amor
1
Te anexo la macro para leer los ean de la fila 2 y buscar cuál tiene archivo de imagen
Sub Macro2()
'
i = 3
For Each c In Range("G" & i & ":J" & i)
nombre = c.Value
archivos = Dir("*.*")
Do While archivos <> ""
If InStr(1, archivos, nombre) > 0 Then
'
imagen = archivos
If imagen <> "" Then
Set etiqueta = ActiveSheet.Pictures.Insert(archivos)
enidf
End If
Loop
Next
End Sub
