Entwickler-Ecke
Dateizugriff - Findtext
Susan - Do 25.07.02 10:57
Titel: Findtext
Hallo!
Habe folgendes Problem.
Ich möchte bestimmte Wörter aus Word auslesen.
Aber ab einem bestimmten Punkt komme ich nicht weiter.
Quelltext
1:
2:
| word.set myRange := word.ActiveDocument.content;
word.myRange.find.execute (findtext := 'Hallo' , Forward := true); |
Er sagt dann bei set myRange das er den Operator oder Simikoln nicht finden kann. Das hatte ich aber umgestellt aber als es dann am laufen war sagt er das er die Methode nicht finden kann.
Kann mir jemand von euch weiterhelfen?[/code]
Tino - Do 25.07.02 12:16
Musst Du da nicht das Leerzeichen entfernen?
Quelltext
1:
| word.setmyRange := word.ActiveDocument.content; |
Gruß
Susan - Do 25.07.02 13:12
Hi!
Nein, dann kommt die Meldung das die Methode setmyrange nicht vom Automatisierungsobjekt unterstützt wird :cry:
Susan - Mi 31.07.02 09:38
Hallo!
Hab nochmaö alles versucht aber es will einfach nicht.
Hat den sonst keiner eine Idee?
Ralvsen - Fr 02.08.02 14:42
Hi Susan,
probier mal OLE Objekte zu erstellen, also etwa so (nicht getestet):
Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
| var
ov: OLEVariant;
oleword: OLEVariant;
begin
oleword := CreateOleObject('Word.Application');
// LoadDocument
oleword.visible := True; // Zeigt Dir WORD an...
ov := oleword.ActiveDocument.content;
ov.find.execute( "Hallo", EmptyParam, EmptyParam (...) );
oleword.Quit; // Beendet WORD gleich |
Du tust Dich leichter, wenn Du die Methoden von TWordApplication, bzw. TWordDocument verwendest, dann hast Du nämlich auch Syntaxhelp.
Prinzipiell kannst Du den WORDMakrocode übrigens nur als Hilfestellung betrachten, nicht als copy/paste-Lösung.
Grüße
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2024 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!