[VBA-E] Image et classeur

Bonjour,

Je cherche a afficher une image sur une feuille de classeur.

Faire

Code:

---

activesheet.shapes("image"&page).select

---

fonctionne sans pb mais lorsque je veux changer la photo ca ne marche pas :

Code:

---

activesheet.shapes("image"&page).picture=loadpicture(repertoire_source &"\plat.jpg"')

---

Qqn à une idée ???

Mercid 'avance

bonjour

Tu ne précises pas comme l'image est insérée à l'origine?
Il s'agit d'un contrôle Image (issu de la boîte à outils contrôles) ou d'un ajout type Menu/Insertion/Image


Si tu utilises un contrôle image:

Code:

---

1 2 3 4

Dim Obj As OLEObject   Set Obj = ActiveSheet.OLEObjects("Image" & Page) Obj.Object.Picture = LoadPicture(repertoire_source & "\plat.jpg")

---

michel