Bjr,

Je n'arrive pas à supprimer des images à l'intérieur d'une plage donnée.
J'ai essayé d'adapter le code suivant:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
Dim Obj As Shape
Set PlageDonnees = Range("E1:E" & Range("E65536").End(xlUp).Row)
 
For Each Obj In ActiveSheet.Shape
Obj.Delete
Next Obj
End Sub
mais si je remplace activesheet par plagedonnees il me sort une erreur.
Est-ce faisable ?