Bonjour ChristianS,
Il s'agit d'images jpg (mais je pense que ça doit aussi marcher avec d'autres formats).
Voici un exemple de séquence :
Sub InsereImage()
Sheets("feuille1").Select
Set Emplacement = Range("a1")
Emplacement.Select
ActiveSheet.Pictures.Insert("http://www.meteofrance.com/img/carto/previsions_france/FRANCE.jpg").Select
End Sub
Ce que je cherche à faire c'est de pouvoir effacer les images disposées sur une colonne définie, et non pas sur toute la feuille, comme c'est le cas avec la séquence :
Sub EnleverTousLesAntecedents()
Sheets("feuille1").Select
ActiveSheet.Pictures.Delete
End Sub
J'espère que quelq'un pourra m'aider à résoudre ce pb.
Cordialement
Albizia