insertion image dans cellule

* Bonjour, *

Je suis novice en excel et j aimerai savoir s il est possible, en vba , de mettre une image d un fichier jpg dans une cellule au lieu de mettre un texte (equivalent de range("A2").value mais pour une image)


Merci d avance
cath

Bonjour,

oui c'est possible !

Le faire manuellement en utilisant l'Enregistreur de macros, le code est livré sur un plateau !

Bonjour marc L

l'enregistreur de macro n'enregistre pas les manipulations des shapes avec 2007

Effectivement, autant pour moi ! Encore une régression … :?

Voir alors du côté de Worksheets.Pictures.Insert({Fichier}) …

L'insertion s'effectue sur la cellule active mais se gère aussi via les propriétés de Shapes …

Bonjour,

Code:

---

1 2 3 4 5 6 7 8 9

Sub essai() répertoirePhoto = "c:\mesdoc\" ' Adapter nom = "droc" Set img = ActiveSheet.Pictures.Insert(répertoirePhoto & nom & ".jpg") img.Left = [B2].Left img.Top = [B2].Top img.Name = nom End Sub

---

Jacques Boisgontier

Merci beaucoup de votre aide, j affiche bien une image, maintenant il faut que je l adapte a la taille de la cellule
Merci encore