Home

Macros and Programming

 

CardboxForumsMacros and Programming > "sos macro"

sos macro

sos macro

Current user: [none]
Register / Log In · Help

Posted By Post

CDP-Nivelles

23-Jun-2006 12:54

Bonjour ma macro :

dim mot(14)
'Recherche mot
mot(1)="a*"
mot(2)="e*"
mot(3)="c*"
mot(4)="i*"
mot(5)="o*"
mot(6)="u*"
mot(7)="y*"
'Remplace mot par...
mot(8)="a"
mot(9)="e"
mot(10)="c"
mot(11)="i"
mot(12)="o"
mot(13)="u"
mot(14)="y"

Activate "TFE MOTS-CLES"
SelectionLevel=0
Database.ClearTagged
FirstRecord
SetSequence "*+MC"
for i=1 to ubound(mot)
activeWindow.select "MC",mot(i)
nb_record=recordcount
if nb_record<>0 then
FirstRecord
for b=1 to nb_record
EditRecord
Command cmdHome+cmdControl
Command cmdDelete
typetext mot(i+7)
SaveRecord
NextRecord
next
NextRecord
end if
SelectionLevel=0
next

Celle-ci fonctionne correctement, le seul problème est que lorsque dans mon champ j'ai Relation parent-enfant et que je fais une recherche e* il trouve bien relation parent-enfant et il ne devrait pas car alors il remplace R par E, ce qui n'est pas juste. avez vous une idée ? merci et bon week-end

Charles Welling

24-Jun-2006 14:59

Si je comprend bien, la macro remplace tous mots "a*" par "a", "e*" par "e" etc. C'est une méthode très compliquée. Essayez "replace", c'est plus façile.

Mais je ne comprend pas votre question. Expliquez s.v.p. quelle sorte d'information est dans votre fichier et donnez une exemple d'une fiche.

Charles

Quick Reply

Please log in or register before trying to post a reply.

 
© 2010 Cardbox Software Limited   Home