Copier définitivement une image

msrtn -  
 msrtn -
Bonjour,

Mon code me permet de récupérer une / des images en suivant un lien.

Une fois que le code est exécuté, j'aimerai que ces images soient définitivement enregistrées dans le fichier, et ne plus avoir à pointer vers le répertoire. Que je puisse tranférer le fichier excel sans avoir à transférer le repertoire contenant les images avec.

Le code est le suivant :

For Each el In ListBox1.List
If el = "Vêtements de protection obligatoire" Then
Set objPict = objFeuille.Pictures.Insert(ThisWorkbook.Path & "/Pictogrammes/Pictodobligation/3.jpg")
End If

Un grand merci d'avance !!!!,



A voir également:

1 réponse

msrtn
 
up !
merci :)
0