Sujet Précédent Sujet Suivant

Supprimer une image

Résolu/Fermé
Tuline Messages postés 55 Date d'inscription mardi 18 mars 2014 Statut Membre Dernière intervention 16 novembre 2018 - 3 août 2017 à 18:41
Tuline Messages postés 55 Date d'inscription mardi 18 mars 2014 Statut Membre Dernière intervention 16 novembre 2018 - 8 août 2017 à 10:30
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 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
3 août 2017 à 19:30
Bonjour,

Voir ceci:

http://boisgontierjacques.free.fr/pages_site/lesimages.htm#AdresseCelluleShape
0
Tuline Messages postés 55 Date d'inscription mardi 18 mars 2014 Statut Membre Dernière intervention 16 novembre 2018
8 août 2017 à 10:30
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 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 775
3 août 2017 à 19:39
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 mardi 18 mars 2014 Statut Membre Dernière intervention 16 novembre 2018
8 août 2017 à 10:29
Merci beaucoup !
C'est parfait !
0

Discussions similaires

Retrouver l'image originale après avoir fait des modifications ?
Raven -
bonjou -

9 réponses
Comment enlever le rouge sur la photo svp ?
lucas0909 -
Benji -

20 réponses