dissocier les info d'une colonne en 2 colonne

[toto]

bonjour c toto,

G un probléme, G des donnée contenu dans une colonne.
il y a des références(des chiffres) et dans la même colonne le nom de l'article lié a cette référence.

le but est d'isoler les chiffres dans une colonne et la référence dans une autre.

est ce possible??

merci d'avance...

toto
cordialement

 

[@+Thierry]

Salut Toto, le Forum

Je n'ai pas le droit de télécharger des fichiers depuis le bureau, donc je vais "imaginer" tes données :

Possibilité 1
123456 ReferenceZozo
12154 ReferenceZaratoustra
5487878787878 ReferenceZ

Solution VBA (Excel 2000 ou +)
Sub Toto()
Dim Cell As Range
Dim Contenu As Variant
For Each Cell In Range("A1:A100")
Contenu = Split(Cell, Chr(32))
On Error Resume Next
Cell.Offset(0, 1) = Contenu(0)
Cell.Offset(0, 2) = Contenu(1)
Next
End Sub

Solution Excel
Sélectionner la colonne des données
Menu Donnée => Text en Colonnes
Choisir Délimiteur " " (espace)

Possibilité 1
123456 ReferenceZozo
789101 ReferenceZaratoustra
789456 ReferenceZ
123458ReferenceZozo
789144ReferenceZaratoustra
789445ReferenceZ

Solution VBA (la précédente solution VBA marcherait ici aussi)
Sub Toto2()
Dim Cell As Range
Dim Contenu As Variant


For Each Cell In Range("A1:A100")
If Cell <> "" Then
Cell.Offset(0, 1) = Left(Cell, 6)
Cell.Offset(0, 2) = LTrim(Right(Cell, (Len(Cell) - 6)))
End If
Next
End Sub


Solution Excel
Sélectionner la colonne des données
Menu Donnée => Text en Colonnes
Choisir largeur définie


Là où ce serait bien plus comliqué ce serait si tu as des trucs du style :
121212121REF2121
1212REF121212121
Là il faut rédiger un code plus délicat...Mais je dois finir un truc d'abord...

Bon Courage et bon wouik hand !!!
@+Thierry

 

[toto]

Thierry, C toto,

je viens de voir T solutions
ton imagination est trés bonne!
mon problème est bien celui que tu a écris en solution 1.
je V appliquer ton code et voir si ca marche.
je te tiens au courant.

merci pour tout, cordialement toto.

Bon week end a toi...