Transformée une formule en macro

Version imprimable

15/10/2015, 16h57
gugod

Transformée une formule en macro

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

Citation:

=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

Bonjour

Code:

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

Bonjour

Code:

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

15/10/2015, 21h14
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
15/10/2015, 22h58
Docmarti

Citation:

Envoyé par gugod

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...
16/10/2015, 09h09
gugod

Merci beaucoup

Je ne savais pas utiliser l'aide comme sa.

Cordialement
GGD