Delphi-PRAXiS - Delphi Bild an Excel übergeben

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)

- - Delphi Bild an Excel übergeben (https://www.delphipraxis.net/103255-bild-excel-uebergeben.html)

ORGADATA AG

13. Nov 2007 11:26

Bild an Excel übergeben

Hallo!
Kann ich mit OLE auch Bilder an Excel übergeben?

DP-Maintenance

13. Nov 2007 11:57

DP-Maintenance

Dieses Thema wurde von "sakura" von "Neuen Beitrag zur Code-Library hinzufügen" nach "Sonstige Fragen zu Delphi" verschoben.

shmia

13. Nov 2007 17:15

Re: Bild an Excel übergeben

Ja, habe folgendes durch Makro-Aufzeichnung erhalten:

Delphi-Quellcode:

			var

  newpic : OleVariant;

begin

   newpic := ActiveSheet.Pictures.Insert('C:\einBild.jpeg');

   // ActiveSheet: selber überlegen, wo du das herbekommst !

   newpic.ShapeRange.Height := 112.5;

   newpic.ShapeRange.Width := 180;

   newpic.ShapeRange.Rotation := 0;

ORGADATA AG

15. Nov 2007 14:54

Re: Bild an Excel übergeben

:-D super das geht! danke!

Alle Zeitangaben in WEZ +1. Es ist jetzt 16:43 Uhr.