Word Dokument In Excel einfügen

[p80286]

Zitat von Nimmersatt:

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]

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]

Definiere dir die Konstante xlPrimary als 1.

[Nimmersatt]

Hallo Mkinzler,

Code:

 olevEXCELoffen.selection.Verb:=1;

Meldung: Die Verb-Eigenschaft des Oleobjekts-Objekt kann nicht festgelegt werden

[Nimmersatt]

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.