XL 2021 Extraire valeur entre caractère par VBA

Rabeto · 4 Juin 2024

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,

mapomme · 4 Juin 2024

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 · 4 Juin 2024

re
ben non pas de nouvelle justement je pensais a lui quand je t'ai répondu
il a tout simplement disparu
j’espère qu'il ne lui est rien arrivé de grave trop bonnard comme bonhomme

patricktoulon · 4 Juin 2024

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

AtTheOne · 4 Juin 2024

Re

patricktoulon à dit:
il serait intéressant de tester ça sur 2 ou 3 mille lignes

Ok, je testerai cela bientôt

patricktoulon · 4 Juin 2024

re j'ai testé sur 10 000 lignes avec moins difficile de faire la différence
avec 10 000 lignes on voit déja que c'est plus lent

XL 2021 Extraire valeur entre caractère par VBA

Rabeto

XLDnaute Occasionnel

mapomme

patricktoulon

XLDnaute Barbatruc

patricktoulon

XLDnaute Barbatruc

AtTheOne

XLDnaute Accro

patricktoulon

XLDnaute Barbatruc

Discussions similaires