supprimer chr(10)Résolu

Question

Bonjour

Voila, j'ai un projet qui consiste a enregistrer une feuille excel en format csv, puis de faire un script pour généré des pages htm a partir du fichier csv.

Mon problème c'est que je voudrais supprimer a partir du script tous les retour de ligne (chr(10)) présent dans le fichier csv.

J'ai essayé plusieurs solution mais aucune n'a fonctionner.

Si vous avez une idée, la seule chose qui est impératif c'est qu'il faut que cela se fasse à partir du script.

Cordialement angenoir666

angenoir666 · Accepted Answer

Bonjour

en faite il existe, mais j'ai trouvé:

je voulais enlever chr(10) ligne par ligne, ce qui n'était pas la bonne solution.

En faite il faut traiter le document en entier:

il faut faire un Replace de Chr(10) par rien (avec "") sur tout le document, et comme dans un csv venant de excel, les fins de lignes sont symboliser par chr(13)&chr(10), il faut pour retrouver le document comme il faut avec les lignes en faisant un replace de Chr(13) par Chr(13)&Chr(10).

Cordialement angenoir666

cs_DARKSIDIOUS · Answer

Utilise la fonction replace :
Replace("Ton Texte", chr(10), "")

angenoir666 · Answer

Merci pour ta rèponse, par contre je me suis rendu contre que je faisais fausse route, effectivmement en supprimant tous les chr(10) du document, le contenu ne forme plus qu'une seule ligne. Chose que je ne veut pas.

J'ai donc décidé de traité au fur et à mesure que je lit les lignes, j'applique donc ta solution sur les lignes, mais des que je rencontre une ligne qui a des Chr(10) j'obtiens le message suivant.

"Indice en dehors de la plage: '[number:2]'"

   Set ts = fso.OpenTextFile("glossaire.csv", ForReading)
   a = ts.Readline
   s = replace( a, Chr(10), " ")
   t = Split(s, ";")
   s1 = t(0)
   s2 = t(2)  'c'est sur cette ligne que l'erreur apparait

Aurais-tu une soluce

Cordialement angenoir666

jrivet · Answer

Salut,

   s2 = t(2)  te donnes indice en dehors de la plage si l'element 2 du tableau n'existe pas 

@+, Julien
Pensez: Moteur de Recherche, Réponse Acceptée, Règlement/FONT>

Supprimer chr(10)

4 réponses

Votre réponse

Discussions similaires