¿Cómo eliminar caracteres numéricos de las celdas en Excel?
Supongamos que tienes una hoja de cálculo que contiene mucha información como "James987den", los datos contienen tanto caracteres alfabéticos como numéricos, y deseas conservar los caracteres alfabéticos y eliminar los caracteres numéricos para todos esos datos. Por ejemplo, convertir "James987den" a "Jamesden". ¿Existen métodos rápidos para manejar esto?
Eliminar caracteres numéricos con código VBA
Eliminar rápidamente caracteres numéricos con Kutools para Excel
![]() | ![]() | ![]() |
Eliminar caracteres numéricos con código VBA
Si estás familiarizado con el código VBA, puedes usar este método siguiendo estos pasos:
1. Haz clic en "Desarrollador" > "Visual Basic" o usa los atajos ("ALT" + "F11") en Excel para activar la ventana de Microsoft Visual Basic para aplicaciones, y haz clic en "Insertar" > "Módulo".
2. Introduce el siguiente código en el módulo:
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. Luego haz clic en el botón "Ejecutar" para aplicar el código. Aparecerá un cuadro de diálogo en la pantalla, donde podrás seleccionar un rango para eliminar todos los caracteres numéricos. Ver captura de pantalla:
5. Haz clic en "Aceptar" y todos los caracteres numéricos habrán sido eliminados.
Eliminar rápidamente caracteres numéricos con Kutools para Excel
La herramienta "Eliminar Caracteres" de "Kutools para Excel" es una poderosa herramienta para eliminar múltiples tipos de caracteres.
"Kutools para Excel": con más de 300 complementos útiles para Excel, prueba gratuita sin limitaciones durante 30 días. Obtener ahora
Paso 1. Selecciona el rango con el que deseas trabajar.
Paso 2. Haz clic en "Kutools" > "Texto" > "Eliminar Caracteres", en el cuadro de diálogo, marca "Numérico", ver captura de pantalla:
Paso 3. Haz clic en "Aceptar" o "Aplicar" para eliminar los caracteres numéricos en los rangos.
Las mejores herramientas de productividad para Office
Impulsa al máximo tu dominio de Excel con Kutools para Excel y experimenta una eficiencia sin precedentes. Kutools para Excel ofrece más de300 funciones avanzadas para potenciar la productividad y ahorrar tiempo.Haz clic aquí para obtener la función que más necesitas...
Office Tab aporta una interfaz de pestañas a Office y hace tu trabajo mucho más sencillo
- Habilita la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abre y crea varios documentos en nuevas pestañas de la misma ventana, en vez de en nuevas ventanas.
- ¡Aumenta tu productividad hasta un50% y reduce cientos de clics de ratón cada día!