Code: Alles auswählen.
CREATE OBJECT lv_wordapp 'word.application'.
SET PROPERTY OF lv_wordapp 'Visible' = 0.
CALL METHOD OF
lv_wordapp
'Documents' = lv_wordadoc.
CALL METHOD OF
lv_wordadoc
'Open' "'FILEOPEN'
EXPORTING
#1 = lv_file
#3 = 1. "Das sollte der Parameter sein der es Schreibgeschützt öffnet --> beim Excel war das die Lösung
CALL METHOD OF
lv_wordapp
'ActiveDocument' = lv_wordadoc.
CALL METHOD OF
lv_wordadoc
'Content' = lv_wordcont.
CALL METHOD OF
lv_wordadoc
'SaveAs'
EXPORTING
#1 = lv_saveas
#2 = 9 "9 steht für .mht
.
CALL METHOD OF
lv_wordapp
'Quit'.
FREE OBJECT lv_wordapp.
Code: Alles auswählen.
CALL METHOD OF lv_wordadoc 'Open' "'FILEOPEN'
EXPORTING
#1 = lv_file
#2 = 0
#3 = 1.
Folgende Benutzer bedankten sich beim Autor larsi für den Beitrag:
Weltenschmerz