Word Dokument mit Wordvorlage aus ABAP erstellen
3 Beiträge
•
Seite 1 von 1
3 Beiträge
Seite 1 von 1
Anhand des Code hier viewtopic.php?t=18538 versuche ich aus einer Wordvorlage dotm-Datei ein Worddokument zu erzeugen.
Leider wird mir in Word nur ein grauer Bildschirm angezeigt.
Wenn ich mit "Open" statt mit "FileNew" arbeite, also so:
öffnet sich das Worddokument. Ist dann allerdings eine dotm-Datei und keine docx. Also keine neues Dokument.
Jemand eine Idee?
Code: Alles auswählen.
CREATE OBJECT p_worddoc 'Word.APPLICATION'.
GET PROPERTY OF p_worddoc 'Application' = wordapp.
SET PROPERTY OF wordapp 'Visible' = 1.
GET PROPERTY OF wordapp 'Documents' = documents.
CALL METHOD OF documents 'FileNew'
EXPORTING
#01 = p_path. "...Pfad zur dotm-Datei
CALL METHOD OF p_worddoc 'AppShow'.
* CALL METHOD OF documents 'Open'
* EXPORTING
* #01 = p_path.
GET PROPERTY OF wordapp 'ActiveDocument' = p_document.
Wenn ich mit "Open" statt mit "FileNew" arbeite, also so:
Code: Alles auswählen.
CREATE OBJECT p_worddoc 'Word.APPLICATION'.
GET PROPERTY OF p_worddoc 'Application' = wordapp.
SET PROPERTY OF wordapp 'Visible' = 1.
GET PROPERTY OF wordapp 'Documents' = documents.
* CALL METHOD OF documents 'FileNew'
* EXPORTING
* #01 = p_path.
*
* CALL METHOD OF p_worddoc 'AppShow'.
CALL METHOD OF documents 'Open'
EXPORTING
#01 = p_path.
GET PROPERTY OF wordapp 'ActiveDocument' = p_document.
Jemand eine Idee?
gesponsert ⓘ
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten
kostenfrei für Ausbildungsberufe und Werksstudenten
So, also das öffnen klappt, aber nicht wie gewollt.
Folgender Code:
Nun hab ich aber gelesen, dass Word.Basic veraltet ist und man was neueres nehmen soll. Vermutlich hat mein Vorgänger im Code daher "Word.Application" verwendet.
Somit die Frage, wie bekomme bei Word.Application die Vorlag als neu Datei auf?
Folgender Code:
Code: Alles auswählen.
CREATE OBJECT p_worddoc 'Word.Basic'.
CALL METHOD OF p_worddoc 'FileNew'
EXPORTING
#01 = p_path. "dotm-File.
CALL METHOD OF p_worddoc 'AppShow'.
Somit die Frage, wie bekomme bei Word.Application die Vorlag als neu Datei auf?
So hab's nach etwas VBA-Studium doch selbst gelöst bekommen:
Via "Word.Application".
Mit "open" öffnet man die dot(m)-Datei selbst und mit "add" macht man daraus ein Word-Dokument (docx).
Code: Alles auswählen.
FORM open USING p_path TYPE pathextern
p_pathz TYPE string
CHANGING p_worddoc TYPE ole2_object
p_document TYPE ole2_object.
DATA: wordapp TYPE ole2_object.
DATA: worddoc TYPE ole2_object.
DATA: documents TYPE ole2_object.
DATA: wordobj TYPE ole2_object.
DATA: documentv TYPE ole2_object.
CREATE OBJECT p_worddoc 'Word.APPLICATION'.
GET PROPERTY OF p_worddoc 'Application' = wordapp.
SET PROPERTY OF wordapp 'Visible' = 1.
GET PROPERTY OF wordapp 'Documents' = documents.
CALL METHOD OF documents 'add'
EXPORTING
#01 = p_path.
* CALL METHOD OF documents 'Open'
* EXPORTING
* #01 = p_path.
GET PROPERTY OF wordapp 'ActiveDocument' = p_document.
"Speichern des Dokuments
CALL METHOD OF p_document 'SaveAs' = documentv
EXPORTING
#01 = p_pathz.
GET PROPERTY OF wordapp 'ActiveDocument' = p_document.
ENDFORM.
Mit "open" öffnet man die dot(m)-Datei selbst und mit "add" macht man daraus ein Word-Dokument (docx).
Seite 1 von 1
Vergleichbare Themen
1
Antw.
Antw.
3385
Views
Views
14
Antw.
Antw.
9792
Views
Views
1
Antw.
Antw.
1991
Views
Views
0
Antw.
Antw.
1181
Views
Views
Bild von SAP via OLE ins Word Dokument einfügen?
von Nicolas_ » 16.01.2006 13:08 • Verfasst in ABAP® Core
von Nicolas_ » 16.01.2006 13:08 • Verfasst in ABAP® Core
0
Antw.
Antw.
1421
Views
Views
Liste als Word oder RFT Dokument ausgeben.
von Gast » 11.03.2005 12:22 • Verfasst in ABAP® für Anfänger
von Gast » 11.03.2005 12:22 • Verfasst in ABAP® für Anfänger
Frage die ABAP Experten
Über diesen Beitrag
msfox
Unterstütze die Community und teile den Beitrag für mehr Leser und Austausch
Aktuelle Forenbeiträge
Newsletter Anmeldung
Keine Beiträge verpassen! Wöchentlich versenden wir lesenwerte Beiträge aus unserer Community.Die letzte Ausgabe findest du hier.