Ungetestet, aber die Methode
AddPicture gibt ein Objekt zurück,
mit dem man weiterarbeiten kann/sollte.
Delphi-Quellcode:
var
myshape:OleVariant;
myshape := Selection.InlineShapes.AddPicture( FileName:= 'C:\Programme\Test\Logos\Logo1.jpg', LinkToFile:=False, SaveWithDocument:= True);
myshape.Select;
myshape.AlternativeText := 'mein neues Bildchen';
myshape.width := ...
myshape.Height := ...
myshape.ScaleHeight := 0.5;