A propos de la fonction SPLIT

[jeannot 45]

Bonjour le forum

Je voudrais poser à votre sagacité deux petites questions

1) existe t -il une fonction qui permette de retrouver le code ASCII d'un caractère

2) Dans la fonction SPLIT, il faut indiquer le délimiteur utiliser dans la chaine de caractères. Comment indiquer que le délimiteur est une tabulation ou un point-virgule.

Déjà mille mercis pour votre aide.

Jeannot 45

 

[Arnaud]

salut,

déja pour le 1) :

Dim MonNombre as Integer

MonNombre = Asc("A") ' Renvoie 65.

 

[LaurentTBT]

Bonjour à tous

Si j'ai bien compris, dans ta chaîne de caractères initiale, tu peux avoir soit des tabulations, soit des ; comme délimiteurs, n'est-ce-pas?
Dans ce cas, je pense que la fonction SPLIT ne peut prendre qu'un seul type de délimiteur.
Par conséquent, je pense que tu pourrais d'abord modifier ta chaine de caractères, par exemple pour échanger les tabulations par des ;
et ensuite, tu applique la fonction SPLIT avec les ;
Maintenant, reste le problème des tabulations. Je n'ai pas trouvé s'il y avait un code unique pour une tabulation. Mais tu peux peut-être vérifier ta chaîne de caractères, et avec un peu de chance, tes tabulations seront représentées par un certain nombre d'espaces, par exemple 3 espaces.
Donc voilà ce que je te propose:
TaChaine=Replace(TaChaine," ",";")
T=Split(TaChaine,";")

Bonne journée.

 

[Lord Nelson]

Bonjour Jeannot, Arnaud et Laurent,

Le code ascii d'une tabulation est 9.
Donc :
Temp = Split(TaChaine, Chr(9))
devrait fonctionner.
On utilise aussi la constante vbTab pour représenter ce caractère.

A+
Horatio

 

[Ti]

le caractère de tabulation a le code 9, donc pour renvoyer ce caractère, tu utilises Chr(9) ou tout simplement la constante vbKeyTab

 

[jeannot45]

Remerciements A propos de la fonction SPLIT

Merci a tous pour votre vivacité.

J'avais bien essayé Chr(9) dans la fonction Split mais il me générait une erreur.

J'ai opté pour la solution de Laurent.

Mon problème est maintenant résolu

A+

Jeannot 45