Das Notes Forum

Domino 9 und frühere Versionen => ND7: Entwicklung => Thema gestartet von: Puthy am 07.11.07 - 14:28:04

Titel: Mit Notes Zugriff auf Word-Kopfbereich
Beitrag von: Puthy am 07.11.07 - 14:28:04

Hallo zusammen,

ich habe einige Daten, die ich von einem Formular in ein word-Dokument exportiere. Dazu wurde eine Vorlage mit Tabellen erstellt. Das funktioniert so weit ganz gut. Jetzt habe ich jedoch auch im Kopfbereich des Word-Dokuments eine Zelle, die ich gerne mit Daten befüllen würde, aber wie  spreche ich den Headerbereich an?  :-:

Titel: Re: Mit Notes Zugriff auf Word-Kopfbereich
Beitrag von: Axel am 07.11.07 - 14:48:17

Eine einfache Lösung wäre dieses:


Set objWord = CreateObject("Word.Application")
...
objWord.ActiveDocument.ActiveWindow.ActivePane.View.SeekView = 9
objWord.Selection.TypeText "Textzeile1"
objWord.Selection.MoveDown 5, 2
objWord.Selection.TypeText "Textzeile2"
objWord.ActiveDocument.ActiveWindow.ActivePane.View.SeekView = 0
...

Axel

Titel: Re: Mit Notes Zugriff auf Word-Kopfbereich
Beitrag von: Puthy am 07.11.07 - 14:53:37

Supi Axel, das funzt einwandfrei. Vielen dank dafür


Christian