Insérer une image liée

Bonjour,
Un document Word 2003 contient 200 images liées (et non intégrées dans le document).

Je souhaiterais écrire une routine qui lit le nom, position et échelle de chaque image, l'efface et insère une autre image à la place à la même position et échelle.

Tout à fait nouveau en VBA pour Word j'aimerais tout d'abord comprendre comment insérer une image liée au document (non sauvegardée dans le document) à une position x,y et échelle z.
Avec le code ci-dessous, l'image est intégrée et non liée.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Sub TEST() Dim imagePath As String imagePath = "C:\11\IM01.jpg" ActiveDocument.Shapes.AddPicture FileName:=imagePath, _ LinkToFile:=True, _ SaveWithDocument:=False, _ Left:=150, _ Top:=150, _ Anchor:=Selection.Range, _ Width:=200, _ Height:=200 End Sub

---

Merci pour votre aide.

Salut,

Essaie avec

Code:

---

LinkToFile:=False

---

Bonjour,

Merci pour ta réponse.
Curieusement

Code:

---

LinkToFile:=False

---

retourne un message d'erreur.
Erreur d'exécution "4120" paramètre incorrect.
J'ai fait le test sur 2 postes différents même résultat.

Merci

Salut,

Il faut modifier aussi la propriété suivante.

Code:

---

1 2	LinkToFile:=False, _ SaveWithDocument:=True,

---