ich versuche gerade, zur Laufteit Image-Objekte auf ein Sheet hinzuzufügen, und Ihnen eine Grafik zuzuweisen.
Mit dem Befehl:
ActiveSheet.OLEObjects.Add(ClassType:="Forms.Image.1", Link:=False, _
DisplayAsIcon:=False, Left:=312.75, Top:=41.25, Width:=88.5, Height:= _
57).Select
kann ich ja ein Image-Objekt erzeugen. Nun versuche ich, diesem Objekt eine Grafik zuzuweisen (das Image-Objekt ist noch selektiert):
Selection.Picture = LoadPicture("c:\windows\angler.bmp")
Leider bekomme ich bei dem LoadPicture einen Fehler (438, Objekt unterstützt die Eigenschaft oder Methode nicht). Wie bekomme ich also mein Bild in das Image-Objekt?
Vielen Dank für eure Hilfe
Frank