Comment supprimer des caractères numériques des cellules dans Excel?
Dit que vous avez une feuille de calcul contenant beaucoup de ces informations James987den, les données contiennent à la fois des caractères alphabétiques et des caractères numériques, et vous souhaitez conserver les caractères alphabétiques et supprimer les caractères numériques pour toutes ces données. Tels que, conversion James987den à Jamesden. Existe-t-il des moyens rapides de régler ce problème?
Supprimer les caractères numériques avec le code VBA
Supprimez rapidement les caractères numériques avec Kutools for Excel
Supprimer les caractères numériques avec le code VBA
Si vous connaissez le code VBA, vous pouvez utiliser cette méthode avec les étapes suivantes:
1. Cliquez Développeur > Visual Basic ou en utilisant des raccourcis (ALT + F11) dans Excel pour activer la fenêtre Microsoft Visual Basic pour applications, puis cliquez sur insérer > Module.
2. Saisissez le code suivant dans le module:
Sub RemoveNum()
'Updateby Extendoffice
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 "[0-9.]" Then
xStr = ""
Else
xStr = xTemp
End If
xOut = xOut & xStr
Next i
Rng.Value = xOut
Next
End Sub
4. Puis clique bouton pour appliquer le code. Adialog est apparu sur l'écran, vous pouvez sélectionner une plage pour supprimer tous les caractères numériques. voir capture d'écran:
5. Cliquez Ok tous les caractères numériques ont été supprimés.
Supprimez rapidement les caractères numériques avec Kutools for Excel
Supprimer les caractères outil de Kutools for Excel est un outil puissant pour supprimer plusieurs types de caractères.
Kutools for Excel: avec plus de 300 compléments Excel pratiques, essai gratuit sans limitation dans 30 jours. Obtenez-le maintenant
Étape 1. Sélectionnez la plage avec laquelle vous souhaitez travailler.
Étape 2. Cliquez sur Kutools > Texte > Supprimer les caractères, dans la boîte de dialogue, cochez Numérique, voir capture d'écran:
Étape 3. Cliquez sur Ok or Appliquer pour supprimer des caractères numériques dans les plages.
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!