Astuce: Les autres langues sont Google-Traduction. Vous pouvez visiter le English version de ce lien.
Se connecter
x
or
x
x
S'enregistrer
x

or

Comment remplacer plusieurs espaces avec un espace unique à partir de cellules dans Excel?

doc remplace plusieurs espaces 1

Supposons que j'ai une liste de chaînes de texte qui contient plusieurs espaces, maintenant, j'ai besoin de remplacer ces espaces avec un seul espace parmi les chaînes de texte pour séparer les mots comme suivant capture d'écran montré. Comment pourrais-je remplacer les multiples espaces avec un seul à la fois sans les supprimer un par un?

Remplacez plusieurs espaces par un seul espace en utilisant une formule

Remplacez plusieurs espaces par un seul espace en utilisant le code VBA

Remplacez plusieurs espaces par un seul espace en utilisant Kutools for Excel


Supprimer les espaces entre les lettres et les mots:

Kutools for Excel's Supprimer les espaces L'utilitaire peut vous aider à supprimer plusieurs types d'espaces, tels que supprimer tous les espaces de début, les espaces de fin, tous les espaces, etc.

doc supprimer des espaces

Kutools for Excel: avec plus que 200 compléments Excel pratiques, libre d'essayer sans limitation dans les jours 60. Téléchargez et essai gratuit maintenant!


Remplacez plusieurs espaces par un seul espace en utilisant une formule


Dans Excel, la fonctionnalité normale Rechercher et remplacer peut ne pas fonctionner correctement pour résoudre ce problème. Nous pouvons donc appliquer une formule simple pour y remédier. S'il vous plaît faites comme ceci:

1. Entrez cette formule: = TRIM (SUBSTITUTE (A2, CHAR (32), "")) dans une cellule vide en plus de la valeur de votre cellule, voir capture d'écran:

doc remplace plusieurs espaces 2

2. Puis appuyez Entrer clé pour obtenir le résultat, et sélectionnez la cellule B2, puis faites glisser la poignée de remplissage sur les cellules de plage que vous souhaitez appliquer cette formule, et tous les espaces supplémentaires ont été supprimés des chaînes de texte et un seul espace sera conservé parmi le texte. Voir la capture d'écran:

doc remplace plusieurs espaces 3


Remplacez plusieurs espaces par un seul espace en utilisant le code VBA

Si le code VBA vous intéresse, je peux créer un code pour remplacer plusieurs espaces par un code unique, procédez comme suit:

1. S'il vous plaît maintenez ALT + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. Puis clique insérer > Moduleet collez le code suivant dans le Module Fenêtre.

Code VBA: Remplacer plusieurs espaces par un espace unique

Sub replace_multiplespaces()
'Updateby20150602
Dim x As Range
Dim Workx As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set Workx = Application.Selection
Set Workx = Application.InputBox("Range", xTitleId, Workx.Address, Type:=8)
    For Each x In Workx
        x = WorksheetFunction.Trim(x)
    Next x
End Sub

3. Puis appuyez F5 clé pour exécuter ce code, et une boîte de dialogue apparaîtra pour vous rappeler de sélectionner la plage de données que vous souhaitez supprimer les espaces supplémentaires, voir capture d'écran:

doc remplace plusieurs espaces 4

4. Et puis cliquez OK bouton, tous les espaces excédentaires ont été remplacés par un seul espace parmi le texte.


Remplacez plusieurs espaces par un seul espace en utilisant Kutools for Excel

Si vous devez supprimer d'autres types d'espaces, tels que supprimer les espaces de début, les espaces de fin, tous les espaces du texte, je recommanderai un outil puissant -Kutools pour Excel, avec ses Supprimer les espaces utilitaire, vous pouvez supprimer tous les espaces dont vous avez besoin, tels que l'espace de tête, les espaces de fin, tous les espaces ...

Kutools for Excel : avec plus de 300 compléments Excel pratiques, libre d'essayer sans limitation dans 60 jours.

Après l'installation de Kutools for Excel, s'il vous plaît faites comme suit:

1. Sélectionnez la plage de données que vous souhaitez supprimer les espaces supplémentaires.

2. Cliquez Kutools > Texte > Supprimer les espaces, voir capture d'écran:

doc remplace plusieurs espaces 5 5

3. Dans le Supprimer les espaces boîte de dialogue, choisissez Tous les espaces excédentaires du Type d'espaces section, et vous pouvez voir le résultat de la Aperçu volet, voir capture d'écran:

doc remplace plusieurs espaces 6

4. Et puis cliquez Ok or Appliquer bouton, tous les espaces supplémentaires ont été supprimés de la cellule et ne laissent qu'un seul espace parmi le texte.

Cliquez pour en savoir plus sur cette fonctionnalité Supprimer les espaces.

Cliquez pour télécharger Kutools pour Excel et essai gratuit maintenant!


Demo: Remplacez plusieurs espaces par un seul espace en utilisant Kutools for Excel

Kutools for Excel: avec plus que 200 compléments Excel pratiques, libre d'essayer sans limitation dans les jours 60. Téléchargez et essai gratuit maintenant!



Outils de productivité recommandés

Office Tab

étoile d'or1 Apportez des onglets pratiques à Excel et à d'autres logiciels Office, tout comme Chrome, Firefox et Internet Explorer.

Kutools for Excel

étoile d'or1 Incroyable! Augmentez votre productivité dans les minutes 5. Ne nécessite pas de compétences particulières, économisez deux heures par jour!

étoile d'or1 300 Nouvelles fonctionnalités pour Excel, rendent Excel facile et puissant:

  • Fusionner des cellules / lignes / colonnes sans perdre de données.
  • Combiner et consolider plusieurs feuilles et classeurs.
  • Comparez les gammes, copiez plusieurs gammes, convertissez le texte en date, l'unité et la conversion de devise.
  • Compter par couleurs, sous-totaux de recherche, tri avancé et super filtre,
  • Plus Sélectionner / Insérer / Supprimer / Texte / Format / Lier / Commenter / Classeurs / Feuilles de calcul Outils ...

Capture d'écran de Kutools pour Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Alan Elston · 1 years ago
    Hi
    Thanks for a useful Blog. It helped me get the answer I was looking for.
    _................

    I was just wondering if this is acceptable and correct for removing Replace Multiple Spaces With Single Space From Cells:

    Taking your example,

    Formal to be dragged down:
    =Trim(A2)
    ( I do not understand why you have SUBSTITUTE(A2,CHAR(32)," ") instead of just A2 ??? )
    It appear to give the correct results.

    _.....
    Here is one way I would do it using VBA
    Sub TrimRange()
    Let Range("B2:B9").Value = Evaluate("=If({1},TRIM(" & Range("A2:A9").Address & "))")
    End Sub

    Alan