VBA séparer les valeurs nombre du texte
Résolu/Fermé
Tobar4
Messages postés
261
Date d'inscription
jeudi 28 janvier 2010
Statut
Membre
Dernière intervention
7 avril 2014
-
25 juin 2012 à 11:45
Tobar4 Messages postés 261 Date d'inscription jeudi 28 janvier 2010 Statut Membre Dernière intervention 7 avril 2014 - 25 juin 2012 à 13:30
Tobar4 Messages postés 261 Date d'inscription jeudi 28 janvier 2010 Statut Membre Dernière intervention 7 avril 2014 - 25 juin 2012 à 13:30
A voir également:
- VBA séparer les valeurs nombre du texte
- Séparer pdf - Guide
- Vba convertir texte en nombre ✓ - Forum Bureautique
- Si cellule contient texte alors ✓ - Forum Excel
- Vba récupérer valeur cellule ✓ - Forum VB / VBA
- Excel cellule couleur si condition texte - Guide
1 réponse
eriiic
Messages postés
24570
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
23 avril 2024
7 213
25 juin 2012 à 12:43
25 juin 2012 à 12:43
Bonjour,
Une proposition par formule.
en B2 :
=MAX((CODE(STXT(STXT(A2;3;30);LIGNE(INDIRECT("1:" & NBCAR(A2)-2));1))>=65)*LIGNE(INDIRECT("1:" & NBCAR(A2)-2))+2)
Formule matricielle à valider avec shift+ctrl+entrée.
en C2 :
=GAUCHE(A2;2)
en D2 :
=STXT(A2;3;B2-3)
en E2 :
=STXT(A2;B2;1)
en F2 :
=STXT(A2;B2+1;30)
https://www.cjoint.com/?BFzmLYaI6UZ
Sinon ça peut être fait par fonction personnalisée matricielle en vba.
eric
Une proposition par formule.
en B2 :
=MAX((CODE(STXT(STXT(A2;3;30);LIGNE(INDIRECT("1:" & NBCAR(A2)-2));1))>=65)*LIGNE(INDIRECT("1:" & NBCAR(A2)-2))+2)
Formule matricielle à valider avec shift+ctrl+entrée.
en C2 :
=GAUCHE(A2;2)
en D2 :
=STXT(A2;3;B2-3)
en E2 :
=STXT(A2;B2;1)
en F2 :
=STXT(A2;B2+1;30)
https://www.cjoint.com/?BFzmLYaI6UZ
Sinon ça peut être fait par fonction personnalisée matricielle en vba.
eric
25 juin 2012 à 13:30
Si je pouvais je t'aurais mis +10 ca marche nickel et je n'ai pas eu à utiliser VB c'est génial !
T.