Delphi-PRAXiS
Seite 1 von 2  1 2   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Grafik von Excel in die Wordtabelle (https://www.delphipraxis.net/198091-grafik-von-excel-die-wordtabelle.html)

Nimmersatt 3. Okt 2018 12:27

Grafik von Excel in die Wordtabelle
 
Hallo,

Ich will eine Grafik, die in einer Excel-Zelle hinterlegt ist, in eine Wordtabelle kopieren. Klappt nicht.

Ist statt einer Grafik ein Text hinterlegt, funktioniert es. Der Befehl lautet:

Delphi-Quellcode:
WordTabelle.Cell(1,1).Range.Text :=excel.cells[1,1].value;


Wie muß ich diese Befehlszeile entsprechend abändern, um die in der Excel-Zelle hinterlegte Grafik sichtbar u machen ?


mfg Nimmersatt

zeras 3. Okt 2018 12:55

AW: Grafik von Excel in die Wordtabelle
 
Ich meine, dass eine Grafik nicht in einer Zelle hängt, sondern nur dort platziert wird. Das würde das Problem erklären. Wie man aber aber die Grafik kommt, weiß ich nicht.

Delphi.Narium 3. Okt 2018 12:58

AW: Grafik von Excel in die Wordtabelle
 
Keine Ahnung, mein erster Versuch wäre:
Delphi-Quellcode:
WordTabelle.Cell(1,1).Range.value :=excel.cells[1,1].value;
Wenn ich in Excel mit Value ein Bild lesen kann, warum sollte ich das in Word als Text schreiben? Für mich wäre da beim Schreiben Value näherliegend.

Ob's geht? weiß nicht.

Nimmersatt 3. Okt 2018 13:48

AW: Grafik von Excel in die Wordtabelle
 
@delphi.Narium

Funktioniert nicht.

Ich versuche jetzt alle möglichen Shapes-Varianten auszuprobieren.



mfg Nimmersatt

Nimmersatt 3. Okt 2018 18:46

AW: Grafik von Excel in die Wordtabelle
 
Eine Grafik aus einem Verzeichnis einzulesen funktioniert, siehe hier

Delphi-Quellcode:
WordTabelle.Cell(1,1).range.InlineShapes.AddPicture('C:\eigene dateien\grafik 1.bmp',false,true);


Hat jetzt jemand eine Idee, wie die Grafik einer Excel-Zelle eingelesen werden kann ?


mfg Nimmersatt

zeras 3. Okt 2018 18:55

AW: Grafik von Excel in die Wordtabelle
 
Zitat:

Zitat von Nimmersatt (Beitrag 1414805)

Hat jetzt jemand eine Idee, wie die Grafik einer Excel-Zelle eingelesen werden kann ?

mfg Nimmersatt

Wie bekommst du eine Grafik in eine Excelzelle? Wenn ich aus der Zwischenablage importiere, dann liegt das Bild nicht in einer Zelle.
Hast du ein Beispiel?

KodeZwerg 3. Okt 2018 18:58

AW: Grafik von Excel in die Wordtabelle
 
Delphi-Quellcode:
Set p = ActiveSheet.Shapes.AddPicture(FileName:=PictureFileName,_
   linktofile:=msoFalse, savewithdocument:=msoCTrue, _ 
   left:=TargetCell.Left, Top:=TargetCell.Top, Width:=-1,_
   Height:=TargetCell.Height)
Gefunden hier. Hilft Dir das?

Nimmersatt 3. Okt 2018 19:10

AW: Grafik von Excel in die Wordtabelle
 
@Zeras

Na Grafik kopieren und bei der Excel-Zelle Inhalte einfügen.
Es gibt da keine Probleme Grafiken in Excel abzulegen.

Ich habe den Sinn deiner Frage nicht verstanden.


@Kodezwerg

Eine ähnliche Lösung habe ich schon gefunden, siehe hier

Delphi-Quellcode:
WordTabelle.Cell(1,1).range.InlineShapes.AddPicture('C:\eigene dateien\grafik 1.bmp',false,true);


Ich möchte aber die Grafik aus einer Excel-Zelle ablesen, die ich dort hinterlegt habe. Wo Excel genau diese Grafik abspeichert, weiss ich nicht.


mfg Nimmersatt

zeras 3. Okt 2018 19:16

AW: Grafik von Excel in die Wordtabelle
 
Zitat:

Zitat von Nimmersatt (Beitrag 1414809)
@Zeras

Na Grafik kopieren und bei der Excel-Zelle Inhalte einfügen.
Es gibt da keine Probleme Grafiken in Excel abzulegen.

Ich habe den Sinn deiner Frage nicht verstanden.

Ich bin nachwievor der Meinung, dass du zwar ein Bild in eine Zelle platzieren kannst, dieses aber nicht zur Zelle gehört, sondern nur durch die Position dort steht. Das Suchen des Bildes muss dann bestimmt nicht über die Zellinformation, sondern anderweitig passieren.

Unter hier steht etwas, wie man Bilder per VBA findet. Das kann man dann bestimmt auch im Excel implementieren.

KodeZwerg 3. Okt 2018 19:45

AW: Grafik von Excel in die Wordtabelle
 
Ich habe mir mal ein Kaufprodukt und dessen Features angeschaut, ich habe ja noch nie versucht ein Bild aus einer Excel Datei zu holen, aber bei denen stehts als not supported.

Du kannst Dir ja hier mal ein paar Macro Beispiele anschauen, mit genug Geduld und Com/Ole sollte dies auch mit Delphi möglich sein, mir fehlt momentan ersteres ;)


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:11 Uhr.
Seite 1 von 2  1 2   

Powered by vBulletin® Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2019 by Daniel R. Wolf