Suppression espace dans cellule

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Suppression espace dans cellule

minimoack

Bonjour à tous !

J'ai fait plusieurs recherches déjà sur la suppression des espaces dans une cellule, mais je ne comprends pas pourquoi ça ne fonctionne pas chez moi..
En gros j'ai des cellules qui contiennent 2 espaces à la fin d'une chaine de caractères, et j'aurais besoin de les supprimer.

J'ai essayé :

Code :

Range("A3" ).Replace What:=" ", Replacement:=""

Code :

For Each cel In Range("A1:A" & [A65000].End(xlUp).Row)
cel.Value = RTrim(cel.Value)
Next cel

Code :

Range("A3" ).Value = Replace(Range("A3" ).Value, " ", "" )

Sauf que ça ne me supprime jamais les espaces à la fin de ma cellule... j'ai plein de cellules, et j'ai essayé sur une seule (A3) pour sortir des boucles et travailler plus simplement mais là je ne vois absolument pas pourquoi cela ne marche pas...

Le tout premier code ci-dessus me supprime un des 2 espaces, mais j'ai beau relancer plusieurs fois les macros, il me reste systématiquement un ou deux espaces... :heink:

J'ai même essayé de faire avec un replace 2 espaces par "" mais toujours rien...

Ceci ne fonctionne pas non plus, il ne rentre même pas dans le while... :??:

Code :

For Ind1 = 2 To nbRows
While Right(Cells(Ind1, 1), 1) = " " 'tant que le dernier caractère est un espace
Len1 = Len(Cells(Ind1, 1)) - 1 'retirer 1 à la longueur de la chaine de caractères
Cells(Ind1, 1) = Left(Cells(Ind1, 1), Len1) 'tronquer la chaine d'un caractère
MsgBox Cells(Ind1, 1).Value + "&"
Wend
Next

En gros j'ai l'impression qu'il ne reconnait pas les espaces dans mes cellules comme des espaces...

Je suis bloquée là, je ne vois pas...
Help please :jap:

Publicité

minimoack

Type de données :

200000000G
200000001B
2879T
20000000023U

Edit : si je copie / colle mes données sur word et que j'affiche les marques de paragraphe, au lieu d'avoir des . signifiants des espaces, j'ai des °

Message édité par minimoack le 26-10-2015 à 11:07:44

minimoack

Bon... j'ai trouvé une solution toute con, je copie colle les 2 derniers caractères de ma cellule dans mon replace, et ça fonctionne, mais quelqu'un sait quel type de caractères ça peut etre ?

Marc L

Bonjour,

si la fonction de feuille de calculs SUPPRESPACE ni les différentes Trim en VBA ne suppriment rien,
ce n'est donc pas un espace ‼

Avec la fonction de feuille de calculs CODE ou encore Asc en VBA, tu auras le code du caractère,
certainement le n°160 pour le caractère insécable souvent utilisé sur le net et récupéré par de mauvais copier / coller !

minimoack

Ok merci pour l'info, je vais regarder :jap:

FORUM HardWare.fr

Programmation

VB/VBA/VBS

Suppression espace dans cellule

Sujets relatifs
[EXCEL] Selectionner cellule avec 2 paramètres	Comment diminuer l'espace entre les <figure> ?
passer les noms de fichiers contenant une ou plusieurs espace(s) ?	Suppression des accents [RESOLU]
Suppression de ligne dans un fichier	Macro copier coller suivant la valeur d'une cellule
script suppression clé de registre	Excel : afficher le détail du calcul dans une autre cellule
Espace vide après footer Wordpress	[CSS] Prendre tout l'espace vertical libre d'un parent ?
Plus de sujets relatifs à : Suppression espace dans cellule

Page générée en 0.067 secondes