Word OLE -> Kopfzeile Textmarke

[darkhell]

Hi @ll,

hoffe ich bin im Richtigen Unterforum gelandet.

Verwende :
WinXP Pro
Word 2000
Delphi 2009

Prinzipiell ich hab heute den ganzen Tag schon irgendwie nach Hilfestellungen gegoogelt und verzweilfe, ev. hat mir einer von euch eine Idee.

WordApp.ActiveWindow.ActivePane.View.SeekView := wdSeekCurrentPageHeader; So ich gehe in den Header ...

WordApp.Selection.TypeText(Text:= 'blubbtest'); Einfach mal zum testen .. klappt auch hier wird einfach in die Kopfzeile blubbtest geschrieben ..

if WordApp.ActiveDocument.Bookmarks.Exists('Überschrift_Block_1') then BEGIN So dann Frag ich ob die Textmarke "Überschrift_Block_1" vorhanden ist ...
da geht er mir mit True weiter ...

  WordApp.Selection.GoTo(wdGoToBookmark,emptyParam,emptyParam,'Überschrift_Block_1'); Nur jetzt sagt er mir "Überschrift_Block_1" gibts nicht ...

Wenn die Textmarke im normalen Text ist und nicht in der Kopfeile .. klappt es wunderbar ...


hoffe einer von euch hat mir ne idee,

Danke schon mal

Gruß,
Manuel