insertion d'imagesRésolu

Question

Bonjour tout le monde, je sais que maintenant c'est bient&#244;t le WD, c'est la premi&#232;re fois que je pose une question ici, on verra....

Je voudrais ins&#233;rer une image  (en fait sch&#233;ma d'installation) dans une feuille Excel si un test est v&#233;rifi&#233;. 

Ou bien ins&#233;rer un de ces sch&#233;mas dans une boite message (le d&#233;bit est assez grand, on peut donc utiliser le sch&#233;ma suivant pour cette installation, et les couts sont moindres.)

Voil&#224;, merci d'avance &#224; celui que peut me secourir et bon week end &#224; tous!!!!!


Bentok

cs_CanisLupus · Accepted Answer

Je ne suis pas un expert en vba excel mais pour effacer toutes les images de la feuille on peut faire :

Sub suppression()
Dim p As Object


For Each p In ActiveSheet.Pictures
    p.Delete
Next
End Sub

-------------------------------------------------
Dresseur de puces, .... normal pour un loup  !?

cs_CanisLupus · Answer

Salut,

Essaie :

ActiveSheet.Pictures.Insert("C:\Mes documents\Mes images\monimage.jpg").Select

-------------------------------------------------
Dresseur de puces, .... normal pour un loup  !?

bentok · Answer

Merci pour le tuyau,

A pr&#233;sent, comment fais tu pour rappeler cette image dans le but de l'effacer au moment o&#249; tu relances ton programme? En fait une fois plac&#233;e dans la feuille excel, il la renomme "Picture 19". 

Ou bien comment fais tu pour effacer toutes les images de la feuille?

Bentok

Insertion d'images

3 réponses