Suppression d'espaces dans une chaine

chris1 · 3 Août 2004

Bonsoir
N'y arrivant pas, je viens solliciter votre aide.
J'arrive bien à supprimer des espaces devant une chaine de caractères mais je n'y parviens pas à le faire lorsque ces espaces se trouvent à l'intérieur.
Par exemple : Dans la cellule B3, j'ai les caractères suivants 1874 XJ 84 qui correspondent à une plaque d'immatriculation.
Je voudrais supprimer les deux espaces existants (soit entre le 4 et le X puis entre le J et le 8) de façon à lire 1874XJ84.
Merci de votre attention.

@Christophe@ · 3 Août 2004

Bonsoir,

Le plus simple, utilise le menu Edition - Remplacer ou CTRL + H

1. Selectionne la plage ou tu veux remplacer les espaces
2. CTRL + H
3. Dans Rechercher mets un 'espace'
4. Dans remplacer modifie rien
5. Accepte et voila

Bonne soirée

@Christophe@

Lord Nelson · 4 Août 2004

Bonsoir Chris et Christophe,

Ou alors avec une petite macro :

Sub SansEspace()
Dim CL As Range
For Each CL In Selection
Do While InStr(CL.Text, " ") > 0
CL.Value = Replace(CL.Text, " ", "")
Loop
Next
End Sub

A+
Horatio

chris1 · 4 Août 2004

Bonsoir

Merci Christophe et merci Horatio, vous êtes des champions.

J'ai essayé les deux systèmes et ça marche impeccable comme dirait Pascal.
Le truc de Christophe paraît tellement simple et évident (mais après coup).

Je n'ai pas pu vous répondre avant car j'ai posé la question très tard et je rentre juste du travail.

Encore merci

Christian

Suppression d'espaces dans une chaine

chris1

Guest

@Christophe@

Guest

Lord Nelson

Guest

chris1

Guest

Discussions similaires

Suppression d'espaces dans une chaine

chris1

Guest

@Christophe@

Guest

Lord Nelson

Guest

chris1

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency