Chaine numérique à transformer

J

JEYBY

Guest
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

XLDnaute Barbatruc
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

@+
 

groussel

XLDnaute Nouveau
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,
 

Discussions similaires

Statistiques des forums

Discussions
312 947
Messages
2 093 842
Membres
105 851
dernier inscrit
aviato