Discussion :

[steph1964]

avez-vous des pb de format DATE (french-anglais)
avec cette procedure
car moi j'utilise celle-ci
http://www.cpearson.com/excel/imptext.htm
et les dates 08/03/2007 sont importées en 03/08/2007

je ne sais comment faire, pour modifier la macro en consequence

les parametres regionaux de Windows sont en JJ/MM/AAAA pourtant

Merci.

[ouskel'n'or]

Pour te répondre il faudrait connaître le format de date dans ton fichier texte. tu peux nous donner un exemple ?

Pour importer les données d'un fichier texte, tu as plusieurs solutions. Ici tu en as une autre.

[steph1964]

08/03/2007
dans le fichier Texte le format est JJ/MM/AAAA

j'ai testé votre procedure, elle est ok pour les dates,

contrairement à la mienne qui inverse certaines date (mais pas toutes !!), pour info :
il ya inversion si le mois est inferieur à 12:
08/03/2007 devient 03/08/2007
alors que
14/03/2007 reste 14/03/2007
ca doit etre un probleme classique.

Mais par contre dans votre procedure, j'ai un autre souci, car :
mon 3eme champ necessite d'etre importé en Format-Excel "Texte"
car sinon:
0101232 devient chez vous 101232

et (moins grave)
les 6eme et 7eme Champs
00000000285.25 reste 00000000285.25
alors que dans ma procedure
00000000285.25 devient 285.25

Ma question est :
dans ma procedure ou la votre
y a t-il un moyen de forcer le type de certains champs à l'import.

Merci
je vais aussi regarder vos autres solutions.

[ouskel'n'or]

Oui, il y a moyen si tu mets une condition sur la colonne.
J'ai mis la solution hier, tu cherches de ton côté, si je la trouve, je te mets l'url
A+

Edit
J'ai relu ton message mais je ne comprends pas. Le problème semble se situer au niveau des formats de colonnes. Peux-tu nous mettre une ligne complète de ton fichier texte qu'on ait une idée ?
A+

[steph1964]

mais il n'y a pa de pb, puisque votre procedure importe correctement les dates

c'est MA procedure qui n'importe pas correctement les dates.

par ailleurs voici une ligne de mon txt:
08/03/2007;VE;0101232 ;FC00702116;LE TANNEUR & CIE ;00000000285.25;00000000000.00;E

quand vous parlez d'une condition sur la colonne, s'agit-il de la macro ou de la feuille ? et quelle serait la syntaxe d'une conversion ?

[steph1964]

je viens de tester cette Macro, LireFichierTxt()

http://www.developpez.net/forums/sho...d.php?t=363643

il ya le meme pb de date avec le mois/jour inversé

[ouskel'n'or]

quand vous parlez d'une condition sur la colonne, s'agit-il de la macro ou de la feuille ? et quelle serait la syntaxe d'une conversion ?

J'ai testé en passant par la macro mais le résultat n'est pas celui que j'attendais (!). Il reste donc la possibilité de formater les colonnes concernées. Il suffit de mettre après le "Close #1"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

    Columns("F:G").NumberFormat = "00000000000.00"

En faisant ça, j'obtiens

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
03/08/2007  VE  101232  FC00702116  LE TANNEUR & CIE   00000000285,25	00000000000,00	E
03/08/2007  VE  101232  FC00702116  LE TANNEUR & CIE   00000000285,25	00000000000,00	E
03/08/2007  VE  101232  FC00702116  LE TANNEUR & CIE   00000000285,25	00000000000,00	E
03/08/2007  VE  101232  FC00702116  LE TANNEUR & CIE   00000000285,25	00000000000,00	E

A+