Comment supprimer tous les espaces après le dernier caractère dans Excel ?

Pour supprimer tous les espaces après le dernier caractère (espaces de fin) des cellules, que feriez-vous ? Cet article vous montrera deux méthodes pour y parvenir.

Supprimer tous les espaces après le dernier caractère avec un code VBA
Supprimez facilement tous les espaces après le dernier caractère avec Kutools pour Excel

Supprimer tous les espaces après le dernier caractère avec un code VBA

Le code VBA suivant peut vous aider à supprimer tous les espaces après le dernier caractère des cellules.

1. Sélectionnez les cellules dont vous devez supprimer tous les espaces après le dernier caractère, puis appuyez simultanément sur Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

2. Dans la fenêtre Microsoft Visual Basic pour Applications, cliquez sur Insertion > Module. Ensuite, copiez et collez le code VBA suivant dans la fenêtre Module.

Code VBA : Supprimer tous les espaces après le dernier caractère

Sub NoSpaces()
    Dim xRg As Range
    Dim xTxt As String
    Dim xCell As Range
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Please select range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    For Each xCell In xRg
        xCell.Value = RTrim(xCell.Value)
    Next
    Application.ScreenUpdating = True
End Sub

3. Appuyez sur la touche F5 pour exécuter le code, puis une boîte de dialogue Kutools pour Excel apparaît. Veuillez sélectionner la plage où vous devez supprimer tous les espaces après le dernier caractère, puis cliquez sur le bouton OK.

Tous les espaces après le dernier caractère des cellules sélectionnées sont immédiatement supprimés.

Supprimez facilement tous les espaces après le dernier caractère avec Kutools pour Excel

Dans cette section, nous vous recommandons l'utilitaire Supprimer les espaces de Kutools pour Excel. Avec cet utilitaire, vous pouvez non seulement supprimer les espaces de fin, mais aussi tout type d'espaces tels que les espaces avant ou excédentaires en quelques clics selon vos besoins.

1. Sélectionnez la plage de cellules dont vous devez supprimer tous les espaces après le dernier caractère. Ensuite, cliquez sur Kutools > Texte > Supprimer les espaces. Voir capture d'écran :

2. Dans la boîte de dialogue Supprimer les espaces, sélectionnez l'option Espaces après, puis cliquez sur le bouton OK. Voir capture d'écran :

Tous les espaces après le dernier caractère des cellules sélectionnées sont alors supprimés immédiatement.

Remarque : Si vous souhaitez supprimer tous les espaces avant ou d'autres types d'espaces selon vos besoins, sélectionnez l'option correspondante dans la boîte de dialogue Supprimer les espaces, puis appliquez la fonction.