supprimer une image Résolu

Question

Bonjour, 

Je voudrais supprimer une seule des images présentes sur ma feuille excel svp

Elle est située en D68 de la feuille "Sign"
J'ai bien essayé cela :
Dim img As Object
For Each img In Sheets("Sign").Shapes
    img.Delete
Next

Cependant, ca me supprimer évidemment toutes les images de la feuille.
Comment ne supprimer que l'image de la case D68 svp ?

Merci pour votre aide
Tuline

cs_Le Pivert · Answer

Bonjour,

Voir ceci:

http://boisgontierjacques.free.fr/pages_site/lesimages.htm#AdresseCelluleShape

Patrice33740 · Answer

Bonjour,

Essaies ce code :
Sub test()
Dim shp As Shape
  For Each shp In Sheets("Sign").Shapes
    If shp.Type = msoPicture Then
      If shp.TopLeftCell.Address = "$D$68" Then shp.Delete
    End If
  Next shp
End Sub

Supprimer une image

2 réponses

Discussions similaires

Newsletters