Aide fonction split

Bonjour à tous,
J'aurais voulu un petit coup de main pour la fonction suivante :

Code:

---

Tableau = Split(arrFileLines(x), Chr(9))

---

Ce code marche parfaitement mais il m'arrive parfois d'avoir dans mon fichier origine deux tabulations cote à cote pour un soucis de lisibilité.

Comment faire pour réécrire la ligne de code en y rajoutant
"J'aimerai que tu vois si parfois il n'y a pas une autre tabulation à la suite"

salut,

et dans le cas où tu as deux tabulations, tu souhaiterais quel type de comportement dans le code ?

Si tu veux supprimer deux tabulations côte à côte, ca donnerait ca par exemple :

Code:

---

arrFileLines(x) = Replace(arrFileLines(x), Chr(9) & Chr(9), chr(9))

---

Et en fait non, j'ai besoin de garder ces deux tabulations pour un soucis de réécriture sur fichier texte; mais quand je crée mon tableau avec pour délimiteur le Chr(9), j'aimerai qu'il crée les cases normalement avec 2 tabulations.

Par exemple j'ai ceci :

X1 Chr(9) X2 Chr(9) Chr(9) X3

et quand je réécris ce tableau, il me met un espace vide, comme si le "rien" entre les deux Chr(9) était une case !

parce que la fonction split fonctionne comme cela :)

Qure voudrais-tu avoir à la place ? :mrgreen:

Je voudrais que mon tableau soit créé normalement avec X1 X2 et X3 qui se suivent meme si parfois les délimiteurs entre ces valeurs changent (Chr(9) ou Chr(9)&Chr(9))

Utilise une variable intermédiaire comme suggéré par jpcheck

Code:

---

1 2 3 4

Dim Tmp As String   Tmp = Replace(arrFileLines(x), Chr(9) & Chr(9), Chr(9)) Tableau = Split(Tmp, Chr(9))

---

donc tu peux utiliser le bout de code proposé, ca annihile le double tab et le transforme en un seul tab :)
la fonction split derreire reste identique