Das Notes Forum

Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: pippo am 17.10.03 - 10:27:08

Titel: Auf Winword schreiben
Beitrag von: pippo am 17.10.03 - 10:27:08
Hallo,

kann mir bitte jemand sagen wie ich von Notes auf Word schreiben kann

objDoc ist mein Worddocument

möchte einfach Text einfügen, aber nicht über Zwischenablage

objDoc.Range.InsertAfter "Test" ...liefert den Fehler, dass Range keine Eigenschaft ist..

Grüße, Pippo
Titel: Re:Auf Winword schreiben
Beitrag von: Semeaphoros am 17.10.03 - 10:55:30
objDoc.Selection.TypeText("Dein Text")
Titel: Re:Auf Winword schreiben
Beitrag von: pippo am 17.10.03 - 11:00:10
Hallo,

es kommt die Fehlermeldung, dass "Selection" kein member ist...

muß man wohl auch definieren

Grüße, Pippo
Titel: Re:Auf Winword schreiben
Beitrag von: Semeaphoros am 17.10.03 - 11:26:45
Dann steht in objDoc kein Word-Dokument drin (oder ist gar nicht initialisiert). Schau mal im Debugger, was denn in der Var drinsteht. Wenn die Var definiert ist, dann ist Word ohne Dokument gestartet, da müsste man dann wohl erst mal ein neues Dok aufmachen (sorry, weiss grad nicht auswendig wie, aber das siehst Du rasch im VBA-Editor)
Titel: Re:Auf Winword schreiben
Beitrag von: pippo am 17.10.03 - 11:34:57
Hallo,

doch, objDoc ist ein Worddocument, wie Du siehtst


Call  wordApp.Documents.Add
Set objDoc = wordApp.activedocument

stelle fest, dass Notes mit Winword etwas sensibel ist

Grüße, Pippo
Titel: Re:Auf Winword schreiben
Beitrag von: pippo am 17.10.03 - 11:39:28
Hallo,

habe es gefunden; man muß das Range definieren!

objDoc.Range(0,0).InsertAfter("Test")

Grüße, Pippo
Titel: Re:Auf Winword schreiben
Beitrag von: Semeaphoros am 17.10.03 - 12:05:55
Sorry, aber die Sensibilität liegt nicht im Notes, sondern im Winword, alles, was hinter objDoc steht, wird unbesehen an Word übergeben (sofern das Mitglied denn innerhalb des Objektes existiert/definiert ist).

Offenbar war bei Dir der Cursor im Word-Dokument in dem Moment gerade irgendwo im Nirvana, könnte ein Versions-spezifisches Problem im Word sein (ein word-Problem ist es definitiv, hat wirklich gar nix mit Notes zu tun)
Titel: Re:Auf Winword schreiben
Beitrag von: Axel am 18.10.03 - 18:19:22
Hi,

ich hab mir mal 'ne Klasse geschrieben, mit der man Word fernsteuren kann. Da sind u. a. Methoden enthalten, mit denen man in Formularfelder schreiben kann und Text an Textmarken einfügen kann. Serienbriefe lassen sich ebenfalls erstellen.

Die läßt sich problemlos in jade Notes-DB einfügen. Du brauchst nur eine Script-Bibliothek einbinden.

Ich stelle die Klasse mit einer kurzen Doku Anfang nächster Woche im Netz zur Verfügung. Vielleicht kannst du damit was anfangen.

Axel
Titel: Re:Auf Winword schreiben
Beitrag von: Semeaphoros am 18.10.03 - 18:55:02
Axel: Das ist ein Wort! Dafür sind Klassen natürlich klasse geeignet. Ich freu mich schon. Danke schon jetzt.
Titel: Re:Auf Winword schreiben
Beitrag von: eknori am 18.10.03 - 18:56:27
auch freu, obwohl ich da eigentlich auch schon was habe...
Titel: Re:Auf Winword schreiben
Beitrag von: eknori am 18.10.03 - 19:01:12
@pippo:
Zitat
objDoc.Range(0,0).InsertAfter("Test")

das ist doch Excel, oder ??
Titel: Re:Auf Winword schreiben
Beitrag von: eknori am 18.10.03 - 19:05:54
hier wäre was

http://www-10.lotus.com/ldd/sandbox.nsf/ecc552f1ab6e46e4852568a90055c4cd/7a66e11e63affdf000256c0e00313d0f?OpenDocument&Highlight=0,word

oder

http://www-10.lotus.com/ldd/sandbox.nsf/ecc552f1ab6e46e4852568a90055c4cd/c58841ba70811b5685256a2a004b496c?OpenDocument&Highlight=0,word

oder

http://www-10.lotus.com/ldd/sandbox.nsf/ecc552f1ab6e46e4852568a90055c4cd/86a9c89f2bf406a185256b6e004f7a29?OpenDocument&Highlight=0,word  ;D

eknori
Titel: Re:Auf Winword schreiben
Beitrag von: Semeaphoros am 18.10.03 - 19:36:58
Ulrich:
Das sieht zwar sehr Excel-lent aus, das gibts aber auch in Word, wobei bestimmt Selection das üblichere wäre. Hier ein Ausschnitt aus der Hilfe für Range unter WW2K

Beispiel zur Range-Methode

In diesem Beispiel wird den ersten zehn Zeichen im aktiven Dokument Fettformatierung zugewiesen.

ActiveDocument.Range(Start:=0, End:=10).Bold = True
Titel: Re:Auf Winword schreiben
Beitrag von: Axel am 20.10.03 - 12:53:01
Hi,

hier die versprochenen Klassen.

http://www.atnotes.de/index.php?board=9;action=display;threadid=11741 (http://www.atnotes.de/index.php?board=9;action=display;threadid=11741)

Die sind natürlich noch ausbaufähig. Das kommt so wie ich die Funktionen brauche.

Axel
Titel: Re:Auf Winword schreiben
Beitrag von: Semeaphoros am 20.10.03 - 13:01:51
Danke, werde es schtuddieren ... :-)
Titel: Re:Auf Winword schreiben
Beitrag von: pippo am 21.10.03 - 12:19:20
Hallo,

nun habe ich den Ausdruck auf Word (einfach geil)!

Dankeschön an alle, welche mir wertvolle Tips gegeben haben!

Schönen Tag, Pippo