Guten Tag zusammen,

ich habe folgendes vor: Ich möchte einen Bereich von Excel kopieren und dieser Bereich in einer Word Datei einfügen. (als Bild)
Bisher hat nur die Lösung geklappt, dass ich den Bereich exportiere als jpeg Datei und diese anschließend in Word einfüge. (wird aber so verpixelt)

Kann man nicht einfach ein Bereich kopieren, dann als Einfügeoption "Bild" in Word einsetzen? Von Hand geht es ja, also muss dafür bestimmt auch einen Befehl geben. Leider finde ich diesen nicht. :(

Mit welche Befehle kann ich die Höhe des Bilds steuern?

Vielen Dank für eure Hilfe!!! :)
Hier ein Auszug vom aktuellen Code:

Sub Berechnungsdatei()

Dim wdApp As Object
Dim wdoc As Object
Dim ab As Byte
Dim BildName As String
'Dim strPath As Object
Dim strPfad As String

    
   Set wdApp = CreateObject("Word.Application")
   wdApp.Visible = True
   wdApp.documents.Open Worksheets("Eingabe").Range("A35") & "CA-2018- Vorlage.doc"
    
Set wdoc = wdApp.ActiveDocument

With wdApp.Selection

        wdoc.FormFields("Text2").Result = Worksheets("Eingabe").Range("b8")   'Firma

         wdoc.FormFields("Text24").Range.InlineShapes.AddPicture Filename:= _
        ("P:\Tech\Datasheet\Data-ber STR\TEST\temp.jpg"), _
        LinkToFile:=False, SaveWithDocument:=True

End with

End Sub