Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Word Dokument In Excel einfügen (https://www.delphipraxis.net/184696-word-dokument-excel-einfuegen.html)

p80286 16. Apr 2015 13:44

AW: Word Dokument In Excel einfügen
 
Zitat:

Zitat von Nimmersatt (Beitrag 1297951)
Ich möchte ein mehrseitiges Word-Dokument einbinden. Unter Excel wird das mit einem Doppelklick auf das Dokument realisiert, es schaltet dann in den Word-Modus um.

Wenn ich mich nicht irre, reicht es das Word-Dokument in Excel einzubinden. Da hat Delphi eigentlich recht wenig mit zu tun.

Ich hab einmal ein wenig mit Excel gespielt:

Code:
 Range("A3").Select
    ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _
        "C:\Daten\Defining Parameters for reading invoices in xml format.rtf", _
        TextToDisplay:= _
        "C:\Daten\Defining Parameters for reading invoices in xml format.rtf"
    Range("A3").Select
    Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
Code:
Range("B10").Select
    ActiveSheet.OLEObjects.Add(Filename:= _
        "C:\Daten\Defining Parameters for reading invoices in xml format.rtf", Link:= _
        False, DisplayAsIcon:=False).Select
    Selection.Verb Verb:=xlPrimary
    ActiveSheet.Shapes.Range(Array("Object 1")).Select
    ActiveSheet.Shapes("Object 1").IncrementLeft 5.25
    ActiveSheet.Shapes("Object 1").IncrementTop 24.75
Im ersten Beispiel wird nur ein Link bzw der entsprechende Text angezeigt,
Im zwiten wird gleich Word mit dem Dateiinhalt eingeblendet, und die Größenänderungen der Anzeige sind mit dabei.

Ich hoffe das hilft Dir weiter.

Gruß
K-H

Nimmersatt 16. Apr 2015 15:37

AW: Word Dokument In Excel einfügen
 
Ich bin jetzt ein Stück weiter

Code:
olevEXCELoffen.ActiveSheet.OLEObjects.add(Filename:='c:\eigene Dateien\Planung.docx', Link:=false, DisplayAsIcon:=False).Select;
olevEXCELoffen.selection.Verb;
Zeigt das Word-Dokument an, springt dann aber in den alten Modus zurück.
Wie verhindere ich das ?


bei

Code:
olevEXCELoffen.selection.Verb:=Xlprimary;
Undefinierter Bezeichner: 'xlPrimary'


bei
Code:
olevEXCELoffen.selection.Verb:=1;
Meldung: Die Verb-Eigenschaft des Oleobjekts-Objekt kann nicht festgelegt werden

mkinzler 16. Apr 2015 15:43

AW: Word Dokument In Excel einfügen
 
Definiere dir die Konstante xlPrimary als 1.

Nimmersatt 16. Apr 2015 15:50

AW: Word Dokument In Excel einfügen
 
Hallo Mkinzler,

Code:
 olevEXCELoffen.selection.Verb:=1;
Meldung: Die Verb-Eigenschaft des Oleobjekts-Objekt kann nicht festgelegt werden

Nimmersatt 16. Apr 2015 15:58

AW: Word Dokument In Excel einfügen
 
Meine Vermutung ist, das beim Beenden auch der Word-Modus beendet wird und zum alten Modus zurückkehrt.
Die Excel-Entwickler gehen wohl davon aus, das die Anwender wissen, wie man in den Word-Modus (Doppelklick auf das Dokument) umschaltet, was nicht der Fall ist.


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:13 Uhr.
Seite 2 von 2     12   

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