Copier une image depuis une feuille Excel et la coller dans Word à un emplacement précis

[zephir94]

Bonjour à tous,

Je voudrais récupérer une image qui est dans une feuille de mon classeur Excel (Image61) et la coller dans un document Word, mais à un emplacement bien précis du document Word.

J'ai crée une zone Texte qui se nomme Text box 2.

J'arrive à la trouver mais mon code bloque quand j'essai de coller mon image dedans !

Voici le code :

Set Ledoc = traitementTexte.Documents.Open(ActiveWorkbook.Path & "/DOC/SYSTEM/BE.doc")
For Each Ma_Forme In Feuil3.Shapes
Feuil3.Select
If Ma_Forme.Name = "Image61" Then
Feuil3.Shapes("Image61").Copy
For Each objet In Ledoc.Shapes
  Zone = (objet.Name)
Next objet
Ledoc.Shapes(Zone).Select
With Ledoc.Shapes(Zone)
.Selection.Paste
End With
Exit For
Else
End If
Next Ma_Forme

arrivé à :

.Selection.Paste

J'ai une erreur 438, propriété ou non gérée par cet objet

Merci par avance pour vos aides

 

[zephir94]

Certes Ce lien n'existe plus,
Mais on me proposait uniquement les signets chose que je ne voulait pas utiliser

Paragraphs

C'est quoi ? un signets ? tu peux m'en dire plus ?
J'ai utilisé il y a quelques temps les signets et ça a été une bérésina.
Tous les deux jours j'étais obligé de remettre le doc Word sur le serveur !!!

 

[Staple1600]

Re

@zephir94
Certes, quoi ?
Peu importe ce quel'on a t'a proposé, le fait est que dans ton premier message, nulle part tu indiques que ta question est posée sur plusieurs forums.
Du coup, j'aurai pu me retrouver dans les 3 points évoqués dans le message#15

PS:
Tu as testé ma macro test sur ton PC ?
Cela fonctionne ou pas?

 

[zephir94]

Oui j'ai testé et ça marche parfaitement et je t'en remercie infiniment, mais moi cette image représente en fait une signature d'ou mon intérêt
de devoir la positionner exactement là où je le souhaite
Du coup comment avec ton exemple comment lui imposer un emplacement défini ?

 

[Staple1600]

Re

@zephir94
Dans ton exemple, l'image était centrée
Donc ma macro centre aussi l'image.

Tu veux la mettre ou exactement ta signature ?

 

[zephir94]

Et bien là était mon problème à un endroit précis du document sous des champs vers le bas de page juste en dessous du Nom du responsable.
D’où mes recherches pour L’insérer sous le nom de ce dernier.
Le côté pratique de ma zone de texte est que je peux la déplacer où je le veux