Supprimer une image

Résolu
Tuline Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   -  
Tuline Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   -
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
A voir également:

2 réponses

Réponse 1 / 2
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
Bonjour,

Voir ceci:

http://boisgontierjacques.free.fr/pages_site/lesimages.htm#AdresseCelluleShape
0
Tuline Messages postés 55 Date d'inscription   Statut Membre Dernière intervention  
 
Merci beaucoup ! j'avais vu ce post mais je n'avais pas réussi à l'adapter :)
0
Réponse 2 / 2
Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   1 780
 
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
0
Tuline Messages postés 55 Date d'inscription   Statut Membre Dernière intervention  
 
Merci beaucoup !
C'est parfait !
0

Discussions similaires

PIX
plart -
jordane45 -

1 réponse
Dechiffrer une image caché
JACQUE -
Otomec -

1 réponse