¿Cómo eliminar los números de celdas que contienen texto y número separados por «Dividir» en Excel?
Este artículo explica cómo eliminar todos los números de las celdas que contienen texto y número divididos, conservando únicamente el texto en dichas celdas, tal como se muestra en la siguiente captura de pantalla.
Eliminar números de celdas que contienen Dividir por texto y número con una función definida por el usuario
Eliminar rápidamente números de celdas que contienen Dividir por texto y número con Kutools para Excel
Eliminar números de celdas que contienen Dividir por texto y número con una función definida por el usuario
La siguiente función definida por el usuario le permite eliminar todos los números de las celdas y conservar únicamente el texto. Siga estos pasos.
1. Pulse simultáneamente las teclas Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
2. En la ventana de Microsoft Visual Basic para Aplicaciones, haga clic en Insertar > Módulo. A continuación, copie y pegue el siguiente código VBA en la ventana de código. Vea la captura de pantalla:
Código VBA: Eliminar números de celdas que contienen Dividir por texto y número
Function OnlyRemoveNumbers(strTxt As String) As String
Application.ScreenUpdating = False
With CreateObject("VBScript.RegExp")
.Global = True
.Pattern = "[0-9]"
OnlyRemoveNumbers = .Replace(strTxt, "")
End With
Application.ScreenUpdating = True
End Function
3. Pulse las teclas Alt + Q para cerrar la ventana de Microsoft Visual Basic para Aplicaciones.
4. Seleccione una celda vacía, introduzca la fórmula =OnlyRemoveNumbers(A2) en la Barra de fórmulas y, a continuación, pulse la tecla Entrar para obtener el resultado. Mantenga seleccionada la celda del resultado y arrastre su controlador de relleno hacia abajo para aplicar la fórmula al resto de celdas. Vea la captura de pantalla:
Eliminar rápidamente números de celdas que contienen Dividir por texto y número con Kutools para Excel
Puede utilizar la utilidad Eliminar caracteres específicos de Kutools para Excel para eliminar fácilmente todos los números de las celdas seleccionadas y conservar únicamente el texto.
1. Seleccione las celdas de las que desea eliminar los números y conservar solo el texto y, a continuación, haga clic en Kutools > Texto > Eliminar caracteres específicos. Vea la captura de pantalla:
2. En el cuadro de diálogo Eliminar caracteres específicos, active únicamente la casilla Numérico en la sección Eliminar caracteres específicos y, a continuación, haga clic en el botón Aceptar.
De este modo, se eliminan todos los números del rango seleccionado y se conserva únicamente el texto.
Si desea probar gratuitamente (30 días) esta utilidad, haga clic aquí para descargarla y, a continuación, siga los pasos anteriores para aplicar la operación.
Demostración: Eliminar rápidamente números de celdas que contienen Dividir por texto y número con Kutools para Excel
Artículo relacionado:
Las mejores herramientas de productividad para Office
Potencie sus habilidades en Excel con Kutools para Excel y experimente una eficiencia como nunca antes.Kutools para Excel ofrece más de 300 funciones avanzadas para aumentar su productividad y Ahorrar tiempo.Haga clic aquí para obtener la función que más necesita...
Office Tab aporta una interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Active la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas dentro de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumente su productividad en un 50 % y elimine cientos de clics del ratón cada día!
Todos los complementos de Kutools en un solo instalador.
Kutools for Office es la suite que incluye complementos para Excel, Word, Outlook y PowerPoint, además de Office Tab Pro, ideal para equipos que trabajan en distintas aplicaciones de Office.
- Suite integral— complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un instalador, una licencia— configuración en minutos (compatible con MSI)
- Rendimiento mejorado en conjunto— productividad optimizada en todas las aplicaciones de Office
- Prueba gratuita de 30 días con todas las funciones— sin registro ni tarjeta de crédito
- La mejor relación calidad-precio— ahorre frente a la compra individual de complementos