Discussion :

[hum2000]

Bonjour,

J'ai teste la methode de cette discussion, ca fonctionne bien si la chaine apparait 1 seule fois par ligne. Par contre si la chaine apparait plusieur fois sur la meme ligne dans le fichier txt, elle ne sera compté que 1 fois.

Est ce que quelqu'un aurait une reponse?

merci

[SfJ5Rpw8]

Pour chercher si une occurence est plusieurs fois dans la même chaine... inspire toi de :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
Dim iPos As Integer
 While iPos > 0
   compteur = compteur + 1
   iPos = InStr(iPos + 1, Chaine, Mot_cherche)
 Wend

et remplace le If InsTR.... / Endif du code initial..