Hallo,

ich möchte in eine Word 2007-Vorlage per Vba ein Bild bei einer Textmarke einfügen, das habe ich so gelöst:

Selection.GoTo What:=wdGoToBookmark, Name:="Kundenlogo"
Selection.InlineShapes.AddPicture FileName:=dlgFilePicker.SelectedItems(1), SaveWithDocument:=True
Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend
Selection.InlineShapes(1).LockAspectRatio = msoTrue

Nun soll das Bild, falls es grösser als eine bestimte Maximalgröße (HöhexBreite) ist, automatisch angepasst werden, jedoch ohne das Seitenverhältnis zu verändern. Und falls es kleiner oder gleich groß ist soll nichts angepasst werden.

Wie löse ich das?

mfg noemo