ich möchte gerne eine Grafik per Makro in ein Word-Dokument einfügen und diese Grafik hinter den Text bringen. Kann mir da jemand helfen?
Vielen Dank
Gruß
Uli
Sub Makro2()
Dim ils As Word.InlineShape
Dim shp As Word.Shape
Set ils = Selection.InlineShapes.AddPicture(FileName:= _
"C:\Pfad\Datei.jpg", LinkToFile:=False, SaveWithDocument:=True)
Set shp = ils.ConvertToShape
shp.ZOrder msoSendBehindText
End Sub
cu