Retrouver le nombre de virgule dans chaine de texteRésolu

Question

Bonjour,

J'aimerais connaitre la fonction qui me permet de retrouver le nombre de "," dans une chaine de caractères.
Car j'ai une texte box ou l'utilisateur peut remplir plusieurs valeurs séparées d'une virgule. Mais je ne peut prendre que 5 valeurs pour la suite.
Donc si y'a 5 virgule, il me mets un message.
J'ai reussi via une cascade de :

If KeyAscii = 44 Then
    Test = Textbox1
    If InStr(Test, ",") > 0 Then
        Test = Mid(Test, InStr(Test, ",") + 1, Len(Test))

Mais je me demande s'il n'y a pas plus simple

De plus quand l'utilisateur met une cinquième virgule, je lui met un "Exit Sub", mais il me rajoute quand meme la cinquieme virgule.
Y'a pas moyen de ne pas la mettre?

Merci

cs_Willi · Accepted Answer

Bonsoir,
Voir ce code snippet ici

Willi
++

cs_vevel · Answer

Merci Willi

jmf0 · Answer

Bonjour,

et pourquoi donc ne pas utiliser tout simplement la fonction Split ?

cs_vevel · Answer

Ah bah ca marche comment cette bete la?

Je connais pas cette commande.
Tu peux m'en dire un peu plus?

jmf0 · Answer

Je n'aurais pas la prétention de savoir t'en dire plus et mieux que ce que t'en dit, fort clairement, ton aide en ligne (MSDN) qu'il t'est vivement conseillé de consulter.
Tu y découvriras que cette fonction est capable d'"éclater" une chaîne de caractères par rapport à un séparateur défini et qu'elle retourne un Array, dont le nombre d'éléments (Ubound) -1 est, précisément, celui des occurences du ... séparateur.
Bonne lecture.

Retrouver le nombre de virgule dans chaine de texte

5 réponses

Votre réponse

Discussions similaires