imagine que tu aies les données suivantes :
122 13 45.5 lundi 06/10/03
6.387 25 32 mardi 13/05/04
2.87 95.3 64 dimanche 25/12/04
chaque champ est séparé par une tabulation, chaque ligne est terminée par un vbCr (ch(10)+chr(13) ou même juste l'un des deux)
tu exportes ça dans un fichier genre "Donnees.txt", ensuite, tu peux importer ce fichier dans Excel via une simple macro de ce genre (Excel 2003, à vérifier pour Excel 2000) :
Sub OuvreTexte() 'Ti
Dim F
F = Application.GetOpenFilename("Fichiers Texte (*.txt),*.txt")
If F <> False Then
'le fichier est ouvert
'le séparateur décimal est le point
'les champs sont séparés par des tabulations
'la cinquième colonne a un format date jj/mm/aa
Workbooks.OpenText Filename:=F, Origin:=xlMSDOS, StartRow:=1, _
DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _
ConsecutiveDelimiter:=False, Tab:=True, Semicolon:=False, _
Comma:=False, Space:=False, Other:=False, _
FieldInfo:=Array(Array(1, 1), Array(2, 1), _
Array(3, 1), Array(4, 1), Array(5, 4)), _
DecimalSeparator:=".", _
TrailingMinusNumbers:=True
End If
End Sub