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 supprimer certains caractères spéciaux de la chaîne dans Excel?

S'il y a des caractères spéciaux tels que % ^ & * () dans les chaînes de texte, et maintenant, vous voulez supprimer ces caractères spécifiques des chaînes de cellules. Pour les supprimer un à un prendra du temps, ici, je vais vous présenter quelques astuces pour résoudre cette tâche dans Excel.

Supprime certains caractères spéciaux de la chaîne de texte avec la fonction définie par l'utilisateur

Supprimer des caractères spéciaux de la chaîne de texte avec Kutools for Excel


Supprime les caractères numériques, alpha ou autres caractères spéciaux de la chaîne de texte:

Kutools for Excel's Supprimer les caractères fonctionnalité peut vous aider à supprimer rapidement tous numérique, alpha, non numérique, non-alpha, non-impression, autres caractères spécifiques à partir des chaînes de texte que vous avez besoin. Cliquez pour télécharger et essai gratuit Kutools for Excel maintenant!

doc supprimer les caractères spéciaux 7

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!


flèche bleue droite bulle Supprime certains caractères spéciaux de la chaîne de texte avec la fonction définie par l'utilisateur


Le code VBA suivant peut vous aider à supprimer les caractères spécifiques dont vous avez besoin, procédez comme suit:

1. Maintenez la touche ALT + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

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

Code VBA: supprime certains caractères spéciaux de la chaîne de texte

Function RemoveSpecial(Str As String) As String
'updatebyExtendoffice 20160303
    Dim xChars As String
    Dim I As Long
    xChars = "#$%()^*&"
    For I = 1 To Len(xChars)
        Str = Replace$(Str, Mid$(xChars, I, 1), "")
    Next
    RemoveSpecial = Str
End Function

3. Ensuite, enregistrez et fermez ce code, revenez à la feuille de calcul et entrez cette formule: = supprime le spécial (A2) dans une cellule vide où vous voulez mettre le résultat, voir capture d'écran:

doc supprimer les caractères spéciaux 1

4. Ensuite, faites glisser la poignée de remplissage vers les cellules auxquelles vous souhaitez appliquer cette formule et tous les caractères spéciaux dont vous n'avez pas besoin d'avoir été supprimés de la chaîne de texte, voir capture d'écran:

doc supprimer les caractères spéciaux 2

Note: Dans le code ci-dessus, vous pouvez modifier les caractères spéciaux # $% () ^ * & à tous les autres que vous souhaitez supprimer.


Si vous n'êtes pas qualifié avec le code VBA, Kutools for Excel's Supprimer les caractères L'utilitaire peut vous aider à terminer cette tâche rapidement et facilement.

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 de la façon suivante:

1. Sélectionnez les chaînes de texte que vous souhaitez supprimer certains caractères spéciaux.

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

doc supprimer les caractères spéciaux 3

3. Dans le Supprimer les caractères boîte de dialogue, vérifier Personnalisé option sous la Supprimer les caractères section, et entrez les caractères spéciaux que vous souhaitez supprimer, voir capture d'écran:

doc supprimer les caractères spéciaux 4

4. Et puis cliquez Ok or Appliquer bouton, les caractères que vous avez spécifiés Personnalisé La zone de texte a été supprimée des chaînes de texte à la fois, voir les captures d'écran:

doc supprimer les caractères spéciaux 5  2 doc supprimer les caractères spéciaux 6

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


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.
    Kim · 2 months ago
    Hmm I wonder, does it only work in the worksheet you've originally pasted the code in?
    As for that one it only seems to work, not for any new workbook you open
    • To post as a guest, your comment is unpublished.
      skyyang · 2 months ago
      Hello, Kim,
      The VBA code can only applied in one workbook, if you want to apply it in a new workbook, you should copy and paste the code into your new workbook again.
      Thank you!
  • To post as a guest, your comment is unpublished.
    Kim · 2 months ago
    Hi guys,

    I've applied the =removespecial(A2) code and it works perfectly in one worksheet but then in the other it gives me an invalid #NAME? error.
    I checked the "format cells" and it's both on general and I've copied the same text + formula to both worksheets but it won't work.
    Any clue what this might cause this?

    Thanks and thank you so much for this code.
    Saves me hours and hours of work!

    Regards, Kim
  • To post as a guest, your comment is unpublished.
    Deepak · 9 months ago
    Function GetWordWOSpecChar(Rng As Range)
    'paste in VBA module, Use as a Formula
    'Created by Deepak Sharma
    Arr = Array("48", "49", "50", "51", "52", "53", "54", "55", _
    "56", "57", "65", "66", "67", "68", "69", "70", "71", "72", "73", "74", "75", _
    "76", "77", "78", "79", "80", "81", "82", "83", "84", "85", "86", "87", "88", _
    "89", "90", "97", "98", "99", "100", "101", "102", "103", "104", "105", "106", _
    "107", "108", "109", "110", "111", "112", "113", "114", "115", "116", "117", _
    "118", "119", "120", "121", "122")

    For i = 1 To Len(Rng.Value)
    txt = Mid(Rng.Value, i, 1)
    For g = 1 To UBound(Arr)
    If txt = Chr(Arr(g)) Then GetWord = Right(Rng.Value, Len(Rng.Value) - (i - 1)): Exit Function
    Next g
    Next i

    End Function