Bonjour,

Le but de ma manipulation:
Rechercher des images dans un document word et les remplacer par des autres.

L'image peut être remplacer par "@image1" par exemple.

Pour rechercher du texte j'utilise:
DocWord>>Selection>>Find>>Execute("@image"+i,OLEIgnore,OLEIgnore,OLEIgnore,OLEIgnore,OLEIgnore,OLEIgnore,WdFindContinue,OLEIgnore,"",WdReplaceAll)

Pour intégrer une image j'utilise:
DocWord>>Selection>>InLineShapes>>AddPicture("C:\CATALOGUES_EXTERNES\IMAGES\image"+i+".gif",False,True)

Le problème est que je dois me déplacer avec un moveRight sinon j'insère toutes les images au même endroit....De plus à terme, je ne connaitrai pas forcément l'emplacement de l'image d'ou l'obligation d'utiliser la recherche.

Pitit Résumer:
Rechercher une info (image ou texte) OK
Remplacer l'info par une image ...Y arrive pas

Merci @++

Juste pour faire avancer la chose...
Pourquoi, au lieu de faire un 'remplacement' ne pas supprimer la sélection et ensuite ajouter l'image à l'endroit du curseur.

Ensuite, il serait sans doute utile de faire précéder chaque image insérée par une marque invisible dans le document (un champ caché ou autre) pour pouvoir les localiser de nouveau ultérieurement.

Notez que sans doute un forum pur vba devrai mieux vous sortir de l'ornière... penser à revenir si solution trouvée.