¿Cómo eliminar los ceros a la izquierda de la cadena de texto alfanumérico en Excel?
Supongamos que tengo una lista de cadenas de texto que incluyen algunos ceros a la izquierda, y ahora quiero eliminar todos los ceros a la izquierda de las cadenas de texto para obtener el siguiente resultado, ¿cómo podría resolver esta tarea en Excel de forma rápida y sencilla?
Elimine los ceros a la izquierda de las cadenas de texto alfanuméricas con fórmula de matriz
Elimine los ceros a la izquierda de las cadenas de texto alfanuméricas con Kutools para Excel
Agregue ceros a la izquierda a las cadenas de texto con Kutools para Excel
Elimine los ceros a la izquierda de las cadenas de texto alfanuméricas con fórmula de matriz
En Excel, no hay una forma directa de eliminar los ceros iniciales de las cadenas, pero puede aplicar la siguiente fórmula de matriz para resolverlo.
1. Escriba esta fórmula de matriz: =MID(A2,MATCH(TRUE,(MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1)<>"0"),0),LEN(A2)) (A2 es la celda de la que desea eliminar los ceros a la izquierda) en una celda en blanco donde desea obtener el resultado, C2, por ejemplo, y luego presione Ctrl + Shift + Enter claves juntas para obtener el resultado correcto, vea la captura de pantalla:
2. Y luego seleccione la celda C2 y arrastre el controlador de relleno hacia las celdas que desea que contengan esta fórmula, todos los ceros iniciales se han eliminado de las cadenas de texto, vea la captura de pantalla:
Elimine los ceros a la izquierda de las cadenas de texto alfanuméricas con la función definida por el usuario
Excepto la fórmula de matriz anterior, el siguiente código VBA también puede hacerle un favor, haga lo siguiente:
1. Mantenga pulsado el ALT + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.
2. Hacer clic recuadro > Móduloy pegue el siguiente código en el Ventana de módulo.
Código de VBA: elimine los ceros a la izquierda de las cadenas de texto alfanuméricas:
Function RemoveLeadingZeros(Str As String)
'updateby Extendoffice
Do While Left(Str, 1) = "0"
Str = Mid(Str, 2)
Loop
RemoveLeadingZeros = Str
End Function
3. Y luego guarde y cierre este código, vuelva a la hoja de trabajo e ingrese esta fórmula: = removeleadingzeros (A2) (A2 es la celda de la que desea eliminar los ceros iniciales) en una celda en blanco, luego arrastre el controlador de relleno hacia las celdas a las que desea aplicar esta fórmula, y todos los ceros iniciales se han eliminado de las cadenas de texto, vea la captura de pantalla :
Elimine los ceros a la izquierda de las cadenas de texto alfanuméricas con Kutools para Excel
Si tiene Kutools for Excel, Con su Quitar ceros iniciales característica, puede eliminar todos los ceros iniciales de varias celdas con un clic.
Kutools for Excel : con más de 300 prácticos complementos de Excel, prueba gratuita y sin límite en 30 días. |
Después de instalar Kutools for Excel, haga lo siguiente:
1. Seleccione las celdas en las que desea eliminar todos los ceros a la izquierda y luego haga clic en Kutools > Texto > Quitar ceros iniciales, ver captura de pantalla:
2. Y luego todos los ceros iniciales en las cadenas de texto se han eliminado a la vez, vea la captura de pantalla:
¡Descargue y pruebe Kutools para Excel ahora!
Agregue ceros a la izquierda a las cadenas de texto con Kutools para Excel
A veces, es posible que desee insertar varios ceros a la izquierda antes de las cadenas de texto a la vez, en este caso, el Kutools for Excel, Añadir texto La utilidad puede ayudarlo a terminar este trabajo lo más rápido posible.
Después de instalar Kutools for Excel, haga lo siguiente:
1. Seleccione las celdas de la cadena de texto a las que desea agregar ceros a la izquierda.
2. Luego haga clic Kutools > Texto > Añadir texto, ver captura de pantalla:
3. En la Añadir texto cuadro de diálogo, ingrese los ceros que desea agregar antes de las cadenas de texto en el Texto cuadro, y luego seleccione Antes del primer carácter del desplegable Puesto de trabajo, ver captura de pantalla:
4. Luego haga clic Ok or ¡Aplicá! botón, el número especificado de ceros se ha insertado antes de todas las cadenas de texto seleccionadas, vea la captura de pantalla:
¡Descargue y pruebe Kutools para Excel ahora!
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite 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 de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!