Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Mehrere Dateien in EIN Word-Dokument laden? (https://www.delphipraxis.net/36820-mehrere-dateien-ein-word-dokument-laden.html)

Nuclear-Ping 26. Dez 2004 14:01


Mehrere Dateien in EIN Word-Dokument laden?
 
Hallo,

wie kann ich mehrere Dateien in EIN und DASELBE Word-Dokument laden?

Über diese Prozedur kann ich jede Datei in ein neues Word-Dokument laden:
Delphi-Quellcode:
{ ************************************************************ }
procedure Open_MS_WordDocument (FileName: String; MSWord: _Application);
{ ************************************************************ }
var
  WordFileName: OleVariant;
begin
  WordFileName := FileName;
  MSWord.Documents.Open (WordFileName, EmptyParam, EmptyParam, EmptyParam,
                         EmptyParam, EmptyParam, EmptyParam, EmptyParam,
                         EmptyParam, EmptyParam);
end;
... aber wie kann ich mehrere Dateien in das gleiche Dokument laden? Praktisch immer hinten anfügen? Ich hoffe, das geht ohne den Umweg über Selection und TypeText.

Vielen Dank und schönen zweiten Weihnachtsfeiertag wünsch ich noch! :)

Grüße,
Mario

Mario 27. Dez 2004 15:36

Re: Mehrere Dateien in EIN Word-Dokument laden?
 
Schaue mal nach Einfügen, Datei. Die Makroaufzeichnung ist dann auf:
Code:
Selection.InsertFile FileName:="test.doc"
gekommen.

Robert Marquardt 27. Dez 2004 16:22

Re: Mehrere Dateien in EIN Word-Dokument laden?
 
Mario hat es ja schon erwaehnt. Die beste Hilfe ist da Word selbst.
Mach die Aktion in Word waehrend die Makro-Aufzeichnung laeuft.
Danach schaust du dir das Makro im VBA-Editor von Word an und laesst dir von der Hilfe Tipps geben.

Nuclear-Ping 28. Dez 2004 10:56

Re: Mehrere Dateien in EIN Word-Dokument laden?
 
Hallo,

gut zu wissen, dass man das über die Word-Makros erfahren kann. Das klappt nun, habt tausend Dank! :) :hello:

Grüße,
Mario


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:09 Uhr.

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