Comment supprimer les caractères non alpha des cellules dans Excel?
Par exemple, vous avez des données de plage telles que Jacob "001" @ # $%, et vous souhaitez supprimer tous les caractères non alpha de la chaîne pour la conserver comme Jacob. Dans Excel, comment supprimer rapidement tous les caractères non alpha des cellules?
Supprimer les caractères non alpha des cellules avec le code VBA
Supprimez rapidement les caractères non alpha des cellules avec Kutools for Excel
Supprimer les caractères non alpha des cellules avec le code VBA
Avec le code VBA, vous pouvez supprimer les caractères non alpha et ne conserver que les caractères alpha (az) dans les cellules comme suit:
1. Mettez en surbrillance la plage dans laquelle vous souhaitez supprimer tous les caractères non alpha.
2. Cliquez Développeur > Visual Basic, une nouvelle fenêtre Microsoft Visual Basic pour applications s'affiche, cliquez sur insérer > Module, puis entrez le code suivant dans le Module:
VBA: supprimer tous les caractères non alpha des cellules
Sub RemoveNotAlphas()
'Updateby2014128
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
xOut = ""
For i = 1 To Len(Rng.Value)
xTemp = Mid(Rng.Value, i, 1)
If xTemp Like "[a-z.]" Or xTemp Like "[A-Z.]" Then
xStr = xTemp
Else
xStr = ""
End If
xOut = xOut & xStr
Next i
Rng.Value = xOut
Next
End Sub
3. Et puis cliquez sur bouton pour exécuter le code. Une boîte de dialogue s'affiche à l'écran pour vous permettre de sélectionner une plage dont vous souhaitez supprimer tous les caractères non alpha. Voir la capture d'écran:
4. Puis clique OK, tous les caractères non alpha ont été supprimés. Voir la capture d'écran:
Supprimez rapidement les caractères non alpha des cellules avec Kutools for Excel
Si vous ne souhaitez pas supprimer tous les caractères non alpha à l'aide d'une macro VBA, vous préférerez peut-être utiliser le Supprimer les caractères outil pour Kutools for Excel.
Kutools for Excel: avec plus de 300 compléments Excel pratiques, essai gratuit sans limitation dans 30 jours. Obtenez-le maintenant
Après l'installation de Kutools for Excel, vous pouvez facilement et confortablement supprimer tous les caractères non alpha d'une plage de cellules.
1. Sélectionnez la plage dans laquelle vous souhaitez supprimer les caractères non alpha.
2. Cliquez Kutools > Texte > Supprimer des caractères.
3. La Supprimer les caractères la boîte de dialogue apparaîtra. Puis vérifier Caractères non alpha option Supprimer les caractères boite de dialogue. En même temps, vous pouvez prévisualiser le résultat à partir du Aperçu Vitre. Voir la capture d'écran:
4. Et puis cliquez sur OK or Appliquer. Tous les caractères non alpha seront supprimés.
Cet utilitaire peut également supprimer des caractères numériques, des caractères non numériques, des caractères non imprimables, etc. Pour plus d'informations sur Supprimer les caractères, S'il vous plaît visitez Description de la fonction Supprimer les caractères.
Articles relatifs:
- Supprimer les caractères alpha des cellules
- Supprimer les caractères non numériques des cellules
- Supprimer les caractères numériques des cellules
- Supprimer les caractères non imprimables des cellules
- Supprimer rapidement les sauts de ligne
- Supprimer les caractères non alphanumériques
Meilleurs outils de productivité bureautique
Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 fonctionnalités avancées pour augmenter la productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et facilite grandement votre travail
- Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!