[Excel]VBA Like

Résolu
Foreverson Messages postés 244 Statut Membre -  
Foreverson Messages postés 244 Statut Membre -
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 18903 Statut Contributeur 3 318
 
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 244 Statut Membre 27
 
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 18903 Statut Contributeur 3 318
 
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 244 Statut Membre 27
 
Merci de ton aide, je vais essayer ça.

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