partie d'un mot

[GI_tang]

bonjour

je cherche a récupérer la fin d'une chaine de charactère, longueur variable mais toujours après le dernier "." exemple:

futru.ruyeh.rt.Ze
récupéré "Ze"
ou
fgrte.ggut.trty.uypu.vg.aze
récupéré "aze"

merci

 

[Staple1600]

Re : partie d'un mot

Bonjour


Utilises Split

Sub b()
Dim str
str = Split("futru.ruyeh.rt.Ze", ".")
MsgBox str(UBound(str))
End Sub

Tu veux travailler sur des cellules

Sub b_range()
Dim c As Range
For Each c In Range([A1], [A65536].End(xlUp))
c.Offset(, 1) = Split(c.Text, ".")(UBound(Split(c.Text, ".")))
Next c
End Sub

 

[GI_tang]

Re : partie d'un mot

nikel merci !

 

[job75]

Re : partie d'un mot

Bonjour GI_tang,

Salut Staple, heureux de te croiser, ça faisait longtemps 🙂🙂

Normalement on n'utilisera pas VBA s'il n'y a que ce problème à régler...

Formule en B2 à tirer vers le bas :

=DROITE(A2;NBCAR(A2)-TROUVE("µ";SUBSTITUE(A2;".";"µ";NBCAR(A2)-NBCAR(SUBSTITUE(A2;".";"")))))

A+