Supprimer espaces + tabulations VBA

bonjour,

J'ai un code EXCEL VBA qui lit le contenu d'un fichier texte ligne par ligne

je souhaite enlever les caractères vides (espaces, tabulation etc...) de chaque ligne (même entre les mots et les chiffres)

J'ai utilisé la fonction

str_ligne = Replace(txtfile.ReadLine, " ", "")

mais cela enlève uniquement les espaces (un seul caractère " " à la fois) et pas quand c'est une tabulation

avez vous une idée svp? (exemple de phrase en PJ)

46fichier.txt (73.00 Octets)

merci d'avance

Bonjour,

Il faut juste enchaîner le Replace

str_ligne = Replace(Replace(txtfile, " ", ""), Chr(9), "")

Merci pour ton retour

j'ai le message suivant "propriété ou méthode non gérée par cet objet)

merci d'avance pour ton aide

Oups, j'ai fait sauté le [.ReadLine] après txfile en recopiant

str_ligne = Replace(Replace(txtfile.ReadLine, " ", ""), Chr(9), "")

merci beaucoup cela fonctionne

bonne soirée