Sujet Précédent Sujet Suivant

[Excel]VBA Like

Résolu/Fermé
Foreverson Messages postés 231 Date d'inscription vendredi 3 octobre 2008 Statut Membre Dernière intervention 22 juin 2014 - 25 juin 2010 à 11:07
Foreverson Messages postés 231 Date d'inscription vendredi 3 octobre 2008 Statut Membre Dernière intervention 22 juin 2014 - 26 juin 2010 à 21:25
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
A voir également:

2 réponses

Réponse 1 / 2
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 310
25 juin 2010 à 11:23
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
Foreverson Messages postés 231 Date d'inscription vendredi 3 octobre 2008 Statut Membre Dernière intervention 22 juin 2014 27
25 juin 2010 à 12:58
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
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 310
25 juin 2010 à 13:39
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
Réponse 2 / 2
Foreverson Messages postés 231 Date d'inscription vendredi 3 octobre 2008 Statut Membre Dernière intervention 22 juin 2014 27
26 juin 2010 à 21:25
Merci de ton aide, je vais essayer ça.

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