OLE WORD Textmarke

Alles rund um die Sprache ABAP®: Funktionsbausteine, Listen, ALV
1 Beitrag Seite 1 von 1
1 Beitrag Seite 1 von 1

OLE WORD Textmarke

Beitrag von Kerstin (Specialist / 193 / 2 / 0 ) » 21. Feb 2019 11:15

Hallo,

ich habe eine WORD-Vorlage mit den Textmarken 'TM1' und 'TM2' angelegt.
Diese möchte ich nun aus einem ABAP heraus anspringen und Texte einfügen. Leider funktioniert der Ansprung überhaupt nicht. Die einzufügenden Texte werden immer an den Beginn der ersten Zeile des Dokuments gestellt.

Die gefundenen Verweise haben mir leider auch nicht weiter geholfen.
Mit WORD.APPLICATION öffnet sich WORD gar nicht.

Ich verwende WORD 2010 in einem 731er System.

Anbei mein Coding.

Code: Alles auswählen.

REPORT z_word_textmarke.

TABLES: sscrfields.
*
* OLE-Definitionen der SAP
INCLUDE ole2incl.
INCLUDE excel__c.
*
DATA: h_word TYPE ole2_object.
*
PARAMETERS: p_dotfl  LIKE rlgrap-filename OBLIGATORY.  "Formatvorlage
*-----------------------------------------------------------------------
START-OF-SELECTION.
*
  CREATE OBJECT h_word 'word.basic'.
  CALL METHOD OF
      h_word
      'AppShow'.

* Dokument auf Basis der Vorlage erstellen
  CALL METHOD OF  h_word   'FileNew'
    EXPORTING
      #1        = p_dotfl.

* Textmarke anspringen
  PERFORM goto_textmark USING 'TM1'.
  CALL METHOD OF  h_word   'Insert'
    EXPORTING
      #1       = 'Text1'.

* Textmarke anspringen
  PERFORM goto_textmark USING 'TM2'.
  CALL METHOD OF  h_word  'Insert'
    EXPORTING
      #1       = 'DUMMY'.

END-OF-SELECTION.
************************************************************************
*---------------------------------------------------------------------
*      Form  GOTO_TEXTMARK
*---------------------------------------------------------------------
FORM goto_textmark USING    p_tmark.
  DATA: txtmark(255) TYPE c.
*
  txtmark = p_tmark.
  CALL METHOD OF
      h_word
      'EditGoto'

    EXPORTING
      #1         = txtmark.
ENDFORM.                    " GOTO_TEXTMARK
Kann mir hier jemand weiterhelfen?

Viele Grüße
Kerstin


Seite 1 von 1

Aktuelle Forenbeiträge

Knobelaufgabe zum Wochenende / Wochenbeginn
vor 12 Stunden von a-dead-trousers 6 / 174
HTTP Request
vor 12 Stunden von a-dead-trousers 2 / 18
BSP-Seiten als Dienst - Fehler beim Aufrufen
vor 20 Stunden von Xilukarim 1 / 27
MATNR Feldlängenänderung von 18 auf 40
vor 23 Stunden von SAP_ENTWICKLER 4 / 149
CCS Bonusabrechnung
vor 23 Stunden von SAP_ENTWICKLER 1 / 18

Aktuelle Forenbeiträge

Knobelaufgabe zum Wochenende / Wochenbeginn
vor 12 Stunden von a-dead-trousers 6 / 174
HTTP Request
vor 12 Stunden von a-dead-trousers 2 / 18
BSP-Seiten als Dienst - Fehler beim Aufrufen
vor 20 Stunden von Xilukarim 1 / 27
MATNR Feldlängenänderung von 18 auf 40
vor 23 Stunden von SAP_ENTWICKLER 4 / 149
CCS Bonusabrechnung
vor 23 Stunden von SAP_ENTWICKLER 1 / 18

Unbeantwortete Forenbeiträge

BSP-Seiten als Dienst - Fehler beim Aufrufen
vor 20 Stunden von Xilukarim 1 / 27
CCS Bonusabrechnung
vor 23 Stunden von SAP_ENTWICKLER 1 / 18
Verfügbarkeitsprüfung
Gestern von NoraP 1 / 18
Verwaltung
Gestern von NoraP 1 / 15
At Selection-Screen
Gestern von L0w-RiDer 1 / 42