Problème pour separer une ligne en plusieur Colone

[Probléme de Mise en Forme]

Bonjour,
J'ai plusieurs fichier Excel qui se presentent comme ceci :

Colonne1
Ligne1 16/05/05 04:04:41 1 F5:
Ligne2 16/05/05 04:04:45 2 F5 :
Ligne3 16/05/05 04:04:53 2 F5 :


Le problème est que tout est ecris dans une seule colonne, et moi je veux diviser chaque information de la ligne en plusieurs champs de cette façon :

Colone1
Ligne1 16/05/05
Ligne2 16/05/05
Ligne3 16/05/05

Colone2
Ligne1 04:04:41
Ligne2 04:04:41
Ligne3 04:04:41

Colone3
Ligne1 F5:
Ligne2 F5:
Ligne3 F5:

etc...

Pour faire ceci j'utilise la fonction 'Convertir...' dans
Données > Convertir... Mais j'ai plusieurs fichiers de ce type et pour ne pas avoir a repeter l'operation jeffectue cette manip dans une macro, voila ma macro :

Columns('A:A').Select
Selection.TextToColumns Destination:=Range('A1'), DataType:=xlFixedWidth, FieldInfo:=Array(Array(0, 4), Array(8, 1), Array(18, 1), Array(21, 1), Array(26, 2), Array(63, 2))


Le problème est que parfois ca ne marche pas correctement, ca melange une partie d'une collone avec une autre...
Cest un peu normal car pour ecrire ce code j'ai fait le test avec un fichier et j'ai regarde le code qui secrivait dans la macro Excel et je, et comme les fichiers ne sont pas tous exactement pareil. Je voudrais que le code detecte de lui même quand on passe de l'heure a la date etc... ou même si une autre fonction marche mieux je suis preneur , jespere avoir ete assez clair.
MERCI

 

[porcinet82]

salut,

je te propose une petite macro qui relève plus du bricolage que d'autre chose mais bon elle a l'air de fonctionner, et si ce n'est pas le cas, tu pourras touours la remodifier.

[file name=bricolage.zip size=7535]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/bricolage.zip[/file]

bon courage

@+

 

[JahRastafari]

Merci ces sympa