Discussion :

[momolamoto]

Bonjour,

je fais un export via Buisness object au format txt d'un reporting.

ce fichier txt se présente sous forme de colonne qui sont séparé par tabulations (pratique pour l'importation de données sous excel)

Je voudrais parcourir ce fichier en parti via une macro et faire un split sur une ligne sachant que cette ligne à plusieurs colonnes séparé par une tabulation mais que dans ses colonnes certaines valeurs sont séparé par des espaces

ex
ligne 1 à 4 colonnes Nom<tab> prenom<tab>Age<tab> Sexe
ligne 2 les valeurs dupont<tab>jean<espace>pierre<tab> 14<tab> m


ex :
j'ouvre mon fichier puis je lis ligne a ligne

Code :

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

1
2
3
4
 
....
 Line Input #NumFichier, ligne
tableau = Split(ligne, ??????)

Que puis je mettre à la place de ???? pour que mon Split reconnaisse la tabulation. j'ai testé avec un espace " " mais le split ne c'est fait que sur la ligne 2(voir plus haut) pour "jean pierre"

[Godzestla]

Salut motard,
pourquoi ne fais-tu pas simplement usage de l'interface d'import dans excel d'un fichier texte en spécifiant que le séparateur est le tabulateur.

Pas besoin de code très complexe pour cela.

[Jean-Pierre49]

Bonsoir à tout le forum

Peu être une piste : vbTab ou Chr(9), selectionne vbTab et

j'en Profite Bonne Année à Tous et à Toutes

[neupont]

Salut,
peut-être pourrais-tu remplacer préalablement les espaces par des tabs, pour n'avoir qu'un seul type de séparateur ?
Exemple :

Code :

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

1
2
3
 Line Input #NumFichier, ligne
ligne = Replace(ligne, " ", chr(9))
tableau = Split(ligne, chr(9))

Evidemment il ne faut pas d'espace dans les données, sinon ça devient ingérable

[momolamoto]

Salut,
peut-être pourrais-tu remplacer préalablement les espaces par des tabs, pour n'avoir qu'un seul type de séparateur ?
Exemple :

Code :

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

1
2
3
 Line Input #NumFichier, ligne
ligne = Replace(ligne, " ", chr(9))
tableau = Split(ligne, chr(9))

Evidemment il ne faut pas d'espace dans les données, sinon ça devient ingérable

Salut,

effectivement sa marche,

Merci