Ich kann dein Schmatzen nicht mehr hören! – Blöde: Lauter kann ich leider nicht.

In Word soll per VBA ein Bild in eine Kopfzeile eingefügt werden. Blöde nur, dass es nach dem Einfügen „hinter den Text“ eingefügt werden soll. Ich habe lange gesucht, bis ich eine Lösung dafür gefunden habe:

Man muss das Bild in eine Form verwandeln (ConvertToShape). Dann funktioniert es:

Set wdMyInShape = wdTabelle.Cell(intZeile, intSpalte).Range.InlineShapes.AddPicture(Bildpfad, , , wdMyRange)
wdKopf.Range.InlineShapes(1).Width = 71
wdKopf.Range.InlineShapes(1).Height = 71
Set wdMyShape = wdMyInShape.ConvertToShape
wdMyShape.WrapFormat.Type = wdWrapBehind  ' 5
wdMyShape.Top = -17.25