PC SOFT

FORUMS PROFESSIONNELS
WINDEV, WEBDEV et WINDEV Mobile

Accueil  |  Messages récents  | Connexion  |   | Français  FR
Accueil → WINDEV (précédentes versions) → Recherche dans un document Word
Recherche dans un document Word
Débuté par Patrice Gence, 01 mar. 2004 15:33 - 2 réponses
#1
Posté le 01 mars 2004 - 15:33
Bonjour,
Il y a dans les exemples windev une application qui possede l'objet automation
"rechercher/remplacer" de word.
J'aimerai savoir comment n'utiliser que la fonction rechercher qui par exemple
reverrait vrai lorsque le mot recherché a été trouvé dans le texte.

Quelle est la syntaxe de cet objet (visible dans l'exemple "pilotage de word"
?

:m_xWord>>Selection>>Find>>Execute(sChRecherche,Faux,Vrai,Faux,Faux,Faux,Vrai,1,Faux,sChRemplace,2)
#2
Posté le 01 mars 2004 - 18:40
vous pouvez tester une variable globale

Is_la_Selection_Aboutie = Faux
clWord:selection("%LI_SIGN%")
SI Is_la_Selection_Aboutie ALORS
// code
fin

Cette variable est déterminée dans une nouvelle méthode de la classe clWord
(à créer):

PROCEDURE Selection(sChRecherche)
// sChRecherche est la chaine recherchée
QUAND EXCEPTION DANS
:m_xWord>>Selection
FAIRE
Info("Vous devez d'abord sélectionner du texte.") RETOUR
FIN

QUAND EXCEPTION DANS
SELON :m_xWord>>Selection>>Find>>Execute(sChRecherche,Faux,Vrai,Faux,Faux,Faux,Vrai,1,Faux,sChRecherche,1)
CAS Vrai
Is_la_Selection_Aboutie = Vrai

CAS Faux
Is_la_Selection_Aboutie = Faux
FIN
FAIRE
Info(sChRecherche)
:MsgErreur("Impossible d'exécuter le Rechercher/Remplacer.",ExceptionInfo())
RETOUR
FIN
#3
Posté le 04 mars 2004 - 07:09
Merci LJ, c'est exactement ce que je cherchais !
→ Revenir à WINDEV (précédentes versions)