[Excel]VBA Like

Résolu/Fermé
Signaler
Messages postés
231
Date d'inscription
vendredi 3 octobre 2008
Statut
Membre
Dernière intervention
22 juin 2014
-
Messages postés
231
Date d'inscription
vendredi 3 octobre 2008
Statut
Membre
Dernière intervention
22 juin 2014
-
Bonjour,
j'ai besoin de travailler avec des expressions régulières sur Excel, il faut je crois passer par like mais je n'y connais pas grand chose...

Voici mon problème : j'ai une chaîne de caractères, et je voudrais supprimer tout ce qui se trouve à gauche du premier "." trouvé (en partant de la droite).

ex : "abcdef.ghijk.lmno" doit donner "lmno"

Merci de bien vouloir m'aider

2 réponses

Messages postés
16547
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
19 janvier 2022
3 260
Bonjour

es - tu obligé de passer par des regex ?
cela se fait facilement en vba avec une fonction split...
(+ dur par formule)

like n'est pas lié au regex

tu dis...
0
Messages postés
231
Date d'inscription
vendredi 3 octobre 2008
Statut
Membre
Dernière intervention
22 juin 2014
26
Non non je ne suis pas obligé, toute solution est bonne à prendre.

J'ai très peu de connaissances en VBA, passer par les regex était simplement une hypothèse.
0
Messages postés
16547
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
19 janvier 2022
3 260
Re,

Fonction personnalisée valable quelque soit le nombre de points >0: utilisation par insertion-fonction- fonction personnalisée

Function extraire_der(cellule As Range) As String
'----extrait le groupe après le dernier point d'un texte dans une cellule

'teste si il ya un point dand le texte
On Error GoTo erreur
Point = cellule.Find(".")

'extrait le groupe
tablo = Split(cellule, ".")
extraire_der = tablo(UBound(tablo))

erreur:
End Function


ci joint maquette:
http://www.cijoint.fr/cjlink.php?file=cj201006/cijwoSOSxe.xls


cordialement
Michel
0
Messages postés
231
Date d'inscription
vendredi 3 octobre 2008
Statut
Membre
Dernière intervention
22 juin 2014
26
Merci de ton aide, je vais essayer ça.

Je passe le sujet en résolu pour le moment.
0