Discussion :

[gugod]

Bonjour,
J'ai une problématique, je souhaite séparer les différent mot d'une phrase dans différente cases.
j'ai réussi a faire cette formule

=SI(NBCAR(B3)-NBCAR(SUBSTITUE(B3;" ";""))+1=A3;STXT(B3;TROUVE("/";SUBSTITUE(B3;" ";"/";A3-1);1)+1;NBCAR(B3)-TROUVE("/";SUBSTITUE(B3;" ";"/";A3-1);1));SI(A3=1;STXT(B3;1;TROUVE("/";SUBSTITUE(B3;" ";"/";1);1)-1);STXT(B3;(TROUVE("/";(SUBSTITUE(B3;" ";"/";A3-1));1));(TROUVE("/";(SUBSTITUE(B3;" ";"/";A3));1))-(TROUVE("/";(SUBSTITUE(B3;" ";"/";A3-1));1)))))

J'aimerai pouvoir fait la même chose dans une macro ou on remplacerait B3(le texte) et A3 (la position du mots) par des variable.

merci beaucoup si vous pouvais m'aider

[Invité]

Bonjour

Code :

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

1
2
3
4
5
txt="tex1;tex1,tex1#")
Rplc=array(";","#",",")
Fori i =0 to ubound(Rplc)
  txt=replace(Txt,Rplc(i),"")
Next

[Docmarti]

Bonjour

Code :

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

1
2
3
4
5
6
7
8
9
10
Sub tt()
lig = 3
txt = "Mes amis, retenez ceci, il n'y a ni mauvaises herbes ni mauvais hommes. Il n'y a que de mauvais cultivateurs. (Victor Hugo)"
t = Split(txt, " ")
For i = 0 To UBound(t)
 lig = lig + 1
 Cells(lig, 2) = t(i)
Next
 
End Sub

[gugod]

Merci rdurupt et docmarti.

Le code fonctionne m'ai j'aime bien comprendre ce que j'écrit, es que vous pouvez m'expliquer les fonction que vous utilisez.

Merci

Cordialement;

GGD

[Docmarti]

Le code fonctionne m'ai j'aime bien comprendre ce que j'écrit, es que vous pouvez m'expliquer les fonction que vous utilisez.

Si tu aimes comprendre, mets le curseur sur le mot dont tu veux l'explication et pèse sur la touche F1,

L'explication obtenue pour SPLIT est :
"Renvoie un tableau de base zéro à une dimension contenant le nombre spécifié de sous-chaînes."
Donc avec la commande
t = Split(txt, " ")

Split choisit l'espace comme délimiteur et sépare le texte en autant d'éléments qu'il y a d'espaces, créant ainsi un tableau contenant ces éléments, et il met ce tableau dans "t".
Donc T contient plusieurs éléments : t(0) est le premier, t(1) le deuxième, t(2) le troisième, etc...

[gugod]

Merci beaucoup

Je ne savais pas utiliser l'aide comme sa.

Cordialement
GGD