Chaine numérique à transformer

[JEYBY]

Bonsoir à tous,

Je recherche une aide sur du code vba pour un excercice bien précis. En effet, je travaille dans une cellule A1 qui contient la valeur suivant : 786645914. Mon but est de réaliser un code me permettant de dissocier ce nombre en 4 séries (sous la forme : 7 866 4591 4). Je souhaite que chaque série soit implantée dans une cellule distincte (ex : à côté de A1, on a B1 = 7, C1 = 866, D1 = 4591 et E1 = 4). Travaillant sur 2400 lignes, je souhaite réaliser un code qui me permet d'automatiser ce boulot. Quelqu'un pourrait-il m'aider à me dépétrer de cette affaire ?

Merci et bonne soirée.

JEYBY

 

[Tibo]

Salut Jeyby,

Sans VBA, insérer une colonne, y copier la formule :

Ton nombre en A1,

=gauche(A1)&' '&stxt(A1;2;3)&' '&stxt(A1;5;4)&' '&droite(A1)

Sous réserve que tes chiffres soient toujours de même longueur.


Bonne soirée

@+

 

[JEYBY]

Re-bonsoir,

Et bien c'est effectivement mieux comme ça, je te remercie c'est parfait (oui ma chaîne numérique était sur la même base, c-a-d 9 chiffres à chaque fois).

Bonne soirée.

JEYBY

 

[groussel]

Bonsoir Jeyby,

Tu écrivais 'Je souhaite que chaque série soit
implantée dans une cellule distincte'

Dans ce cas, selectionnne ensuite ta nouvelle colonne (obtenue avec la formule deTIBO) et choisi le menu Données-Convertir puis :
- l'option 'Délimité'
- Coche la case 'espace'
- Terminer

Et hop ! une colonne pour chaque valeur

ATTENTION :
les colonnes à coté doivent être vides, sinon, SCRATCH !

A plus,