XL 2021 Extraire valeur entre caractère par VBA

Rabeto

XLDnaute Occasionnel
Bonjour,

J'aimerai svp extraire la valeur entre 2 caractères par VBA (premier caractère / et second -)

Valeur à extraire en rouge entre (/ et -)= /XXX/YYY/JJ-MM-AAA-QQ-RR-VALEUR-VILLE-PRIX

Voici le code à adapter selon les besoins : .Cells(i + 3, 12).Value = Split(Split(tbl1(i), "/")(3), "-")(-6)

Merci pour votre aide,
 
Solution
Bonjour à tous ,


Si V est la valeur à traiter alors l'expression suivante extrait la chaine entre le dernier "/" et le cinquième "-" :
VB:
= Mid(Left(V, InStr(Replace(V, "-", "^", , 4), "-") - 1), InStrRev(V, "/") + 1)

patricktoulon

XLDnaute Barbatruc
pour info avec @mapomme je crois pas trop m'avancer pour lui mais nous avons collaboré d"ans le passé sur des macros/fonctions travaillant des chaines de texte
et nous avons constaté que le split est l’outil le plus lourd pour faire ce genre de manipulation
il serait intéressant de tester ça sur 2 ou 3 mille lignes ;)
 

Discussions similaires

Statistiques des forums

Discussions
312 922
Messages
2 093 644
Membres
105 775
dernier inscrit
assen