Discussion :

[John81]

Bonjour,

J'ai un petit problème avec la fonction "TRIM". Le code suivant ne fonctionne pas:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range("A1").Value = TRIM(Range("A1").Value)

Qqn peut-il me venir en aide? Merci

[wilfried_42]

Bonjour

Que cherches tu à faire avec la fonction Trim ?

cette fonction permet de supprimer les espaces de devant de de fin de chaîne.

tu n'exposes pas ce que tu cherches à faire donc dificile de te répondre comme cela !

[John81]

Je cherche à supprimer les espaces de la chaîne.

J'ai par exemple

"VISPI plusieurs espace DOMENICO"

et cela devrait donner

VISPI DOMENICO

Mais cela ne marche pas

[fred65200]

bonjour,
essaie avec la fonction TRIM d'excel (SUPPRESPACE)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

    Range("A1") = Application.Trim(Range("A1"))

En espérant que tes espaces ne sont pas des espaces insécables (Chr(160) ou  . du HTML).
Si c'est le cas, essaie

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

    Range("A1") = Application.Trim(Application.Substitute(Range("A1"), Chr(160), Chr(32)))

Cordialement

[John81]

Merci beaucoup fred65200, ça marche!! Bonne journée. John81