OVH Cloud OVH Cloud

Suppresion espace en fin de ligne

4 réponses
Avatar
JOLY Jean-Luc
Bonjour,
A la suite de concaténation de cellules, j'obtiens un ou plusieurs espaces à
la fin d'une ligne.
J'aimerais les supprimer, mais uniquement ceux là, pas les espaces dans le
corps de la cellule.
Dans ce cas particulier, je n'arrive pas à utiliser la fonction SUPPRESPACE.
Je n'utulise pas le VBA
Merci pour votre aide
Jean-Luc

4 réponses

Avatar
Â+
Bonjour Jean-Luc,

Si la fonction SUPPRESPACE ne supprime pas les espaces, c'est que ce ne sont
probablement pas des CODE(32)
Vérifie par la formule : ÊR(DROITE(A1;1)) et voit si tu n'as pas 160 comme
réponse.
Dans ce cas il faut employer la formule : =SUBSTITUE(A1;CAR(160);"")

Â+




Bonjour,
A la suite de concaténation de cellules, j'obtiens un ou plusieurs espaces à
la fin d'une ligne.
J'aimerais les supprimer, mais uniquement ceux là, pas les espaces dans le
corps de la cellule.
Dans ce cas particulier, je n'arrive pas à utiliser la fonction SUPPRESPACE.
Je n'utulise pas le VBA
Merci pour votre aide
Jean-Luc


Avatar
Francois
Bonjour,
A la suite de concaténation de cellules, j'obtiens un ou plusieurs espaces à
la fin d'une ligne.
J'aimerais les supprimer, mais uniquement ceux là, pas les espaces dans le
corps de la cellule.
Dans ce cas particulier, je n'arrive pas à utiliser la fonction SUPPRESPACE.
Je n'utulise pas le VBA
Merci pour votre aide
Jean-Luc


Bonjour,

Un petite fonction personnalisée qui le fait

Function NOB(CELLULE As Range)
Dim N As Variant
N = CELLULE.Value
N = LTrim(CELLULE)
NOB = N
End Function

A coller dans un module et utiliser comme une fonction normale en
indiquant la cellule à transformer par exemple =NOB(A1)

Cordialement,

--
François L

Avatar
Francois
Bonjour,
A la suite de concaténation de cellules, j'obtiens un ou plusieurs espaces à
la fin d'une ligne.
J'aimerais les supprimer, mais uniquement ceux là, pas les espaces dans le
corps de la cellule.
Dans ce cas particulier, je n'arrive pas à utiliser la fonction SUPPRESPACE.
Je n'utulise pas le VBA
Merci pour votre aide
Jean-Luc


Oups,

Comme dit AV il est ininterressant de répondre trop vite ...

Ce n'est pas
N = LTrim(CELLULE)
mais
N = RTrim(CELLULE)

Désolé

--
François L

Avatar
LSteph
Bonsoir,

A condition qu'il n'y ait pas deux blancs consécutifs dans le texte qui doit
rester
ceci remplacera uniquement ceux de la fin
Edition rempacer[ *](blancblancétoile)
remplacer par[ ] (rien)
Remplacer tout

lSteph

"JOLY Jean-Luc" a écrit dans le
message de news:
Bonjour,
A la suite de concaténation de cellules, j'obtiens un ou plusieurs espaces
à
la fin d'une ligne.
J'aimerais les supprimer, mais uniquement ceux là, pas les espaces dans le
corps de la cellule.
Dans ce cas particulier, je n'arrive pas à utiliser la fonction
SUPPRESPACE.
Je n'utulise pas le VBA
Merci pour votre aide
Jean-Luc