Transformation Txt en Xls

[Titi_Malembourg]

Coucou !

Voici en pièce jointe le fichier texte que je voudrais mettre sous excel...

Voici maintenant la commande pour l'y insérer :
Workbooks.OpenText FileName:=nomdufichier, ConsecutiveDelimiter:=True, Space:=True B)

Le problème est que cela me donne (seulement pour le texte que je vous ai donné) des colonnes défaillantes :angry: . Or, mon programme se veut ouvrir des fichiers comme ceux la automatiquement.
Trouveriez vous une solution à mon problème ?

Merci d'avance

Bonne soirée, Thierry. [file name=ess235_i.zip size=9668]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/ess235_i.zip[/file]

 

[DSA]

Bonjour,

j'ai testé ta ligne de commande sur mon Excel(97) et j'obtiens bien un import 73 lignes par 95 colonnes (comme spécif ds l'entête du fichier). Cependant, personnelement, j'utiliserai la ligne suivante:

Workbooks.OpenText FileName:= nomdufichier, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=True, Space:=True

pour fixer le datatype et prendre en compte les Tabs....

J'espère que cela a pu t'aider

Au revoir

Didier

 

[Titi_Malembourg]

Cela règle mon problème. C'est sympa de t'en etre occupé, merci beaucoup.