Forms.Image aus Excel in word VBA

[Leonhard]

Hallo zusammen,

ich habe vor geraumer Zeit mit Unterstützung von Case https://www.clever-excel-forum.de/thread...#pid157199 Werte aus Excel mit Hilfe von in Word gebildeten Textmarken übertragen.
Jetzt würde ich gerne ein Bild (Forms.Image.1) ähnlich der Texte in das Word-Dokument einfügen. Der Ansatz für einen Text aus Excel in Word sieht wie folgt aus:

Code:

If objDocument.Bookmarks.Exists(strBookmark2) = True Then
           objDocument.Bookmarks(strBookmark2).Range = .Range("B2").Text
       End If
       If objDocument.Bookmarks.Exists(strBookmark3) = True Then
           objDocument.Bookmarks(strBookmark3).Range = .Range("C2").Text

 
usw.
Wie müsste ich das jetzt für das Image.1 machen? Ich habe in der Word Vorlage ein Bildinhaltsteuerelement eingefügt und eine Textmarke darauf platziert in die dann das Foto (Image.1) aus Excel eingefügt werden soll.
Kann mir jemand mal auf die Sprünge helfen, ob ich auf dem richtigen Weg bin, bzw. wie ich mein Vorhaben umsetzen kann
Beste Grüße
Leo

[00202]

Hallo, :19:

du hast ja das Bild irgendwo auf der Festplatte, dann: :21:

Code:

ActiveDocument.Bookmarks("Bild").Range.InlineShapes.AddPicture FileName:=("C:\Temp\Chart1.png"), LinkToFile:=False, SaveWithDocument:=True

Statt "ActiveDocument" natürlich deine Variable für das Worddokument.

Direkt aus "Forms.Image.1" kannst du es nicht nach Word übergeben.