Excel- VBA compter les mots d'une TextBox

Résolu
mod77 Messages postés 1320 Statut Membre -  
tompols Messages postés 1325 Statut Contributeur -
Bonjour,

J'ai une TextBox "tbx7" dans laquelle il peut y avoir plusieurs phrases sur plusieurs lignes.
Elles se terminent toutes par un retour chariot "vbCrLf" et chaque mot de chaque phrase est séparé par un " ".

Mon objectif est d'afficher chaque mots dans les colonnes d'un tableau (et dans le même ordre).

Ma difficulté:
Je ne sais pas comment compter les espaces " " et les "vbCrLf" pour faire des boucles.
J'ai pas de bouquin et j'y travaille depuis hier, c'est la galère. La recherche ne ma rien donné de bon.

Quelqu'un aurait-il l'instruction qu'il me faut SVP?

Merci
A voir également:

7 réponses

tompols Messages postés 1325 Statut Contributeur 435
 
Bonjour,
Regarde du coté de la fonction Split, un ptit exemple ci-dessous :
maStr = "comment ça marche la fonction split?"

macol = Split(maStr, " ")

For Each w In macol
    cpt = cpt + 1
Next w

MsgBox "il y a " & cpt & " mots dans cette string"
0
mod77 Messages postés 1320 Statut Membre 53
 
Merci tompols,
j'essaie ça!
0
mod77 Messages postés 1320 Statut Membre 53
 
J'ai un petit soucis avec mon utilisation. il y a un message incompatibilité de type.

Quel est le type de "macol" dans l'exemple, SVP?
moi je l'ai déclaré en tant que byte or l'assistant dit que c'est un tableau qui est renvoyé.

Quel est le type de "w" aussi SVP?

merci
0
tompols Messages postés 1325 Statut Contributeur 435
 
re,
split renvoi une collection de strings
macol est donc une collection
w est un element de macol donc une string
j'ai pas de pc sous la main pour l'instant (pause dej, jsuis sur mon tel) mais tu devrais pouvoir trouver ce qu'il te faut dans l'aide vba...tiens ns au courant...
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
mod77 Messages postés 1320 Statut Membre 53
 
ok, merci !
Je suis en train de regarder sur vbfrance et j'ai trouvé: UBound ( macol)
je vais voir...
0
mod77 Messages postés 1320 Statut Membre 53
 
Impeccable! ça marche avec Ubound.
Merci et bon appétit!
0
tompols Messages postés 1325 Statut Contributeur 435
 
;)
0