conflit entre suppression d'un espace insécable (no-break) et virgule

[Bouzed]

Bonjour à tous, (1er message sur XLD!) :

J'ai besoin de vos lumières :

J'importe un fichier CSV en xls (encodage UTF8)

Je cherche alors à remplacer les espaces insécables de ma feuille excel avec une macro.

J'utilise donc le code suivant :

Cells.Replace What:=Chr(160), Replacement:="", LookAt:=xlPart, SearchOrder:= _
xlByRows, MatchCase:=True, SearchFormat:=False, ReplaceFormat:=False

Or cela me supprime également certaines virgules... (pas toutes!)

Cf pièce jointe (VBA module 1)

Comment remédier à cela?

 

[laetitia90]

Re : conflit entre suppression d'un espace insécable (no-break) et virgule

bonjour 🙂
essai comme cela exemple pour a1

   [a1] = Application.WorksheetFunction.Trim([a1])

 

[Misange]

Re : conflit entre suppression d'un espace insécable (no-break) et virgule

Bonjour
J'ai cherché un moment mais je sèche complètement !
ta virgule est bien une virgule (chr(44)

ton chr(160) a bien l'air d'être le même dans tes deux nombres
si je tape 10321,408 dans une cellule puis que j'y introduis un chr(160), que ce soit en copiant "le tien" ou en le faisant par
="10&car(160)&321,408 puis un copier valeur, le résultat est le même, la virgule saute avec ta macro et pas le chr(160). Rien de tel dans l'autre nombre et je ne parviens pas à voir ce qui diffère.
Je serai curieuse de connaitre la raison si quelqu'un la trouve !

 

[Bouzed]

Re : conflit entre suppression d'un espace insécable (no-break) et virgule

Je n'y comprend rien! en passant par la manip "manuelle" (ctrl+H) cela fonctionne. Si je reproduis la même chose avec l'enregistreur de macro => Rien, le problème persiste ! Grr...

 

[Bouzed]

Re : conflit entre suppression d'un espace insécable (no-break) et virgule

Malheureusement j'avais pensé à faire une TRIM mais je parle bien ici d'un chr(160) non "traitable" par TRIM :
Ce lien n'existe plus