Necesito eliminar el numero 0 al inicio de una celda numérica
Deseo eliminar los 0 al inicio de un numero en una celda de excel y que no se modifique el resto; este es el numero: 0002000100100000052 deberá quedar: 2000100100000052.
Como son miles de celdas necesito hacerlo a través de una fórmula o de algún modo.
Agradeceré infinitamente si me pueden ayudar.
Gracias anticipadas
1 respuesta
Te anexo una macro, cambia en la macro "B" por la columna en donde tienes tus números, cambia "C" por la columna en donde quieres el resultado.
Sub EliminarCeros() 'Por.Dante Amor ci = "B" 'columna con números cf = "C" 'columna destino For i = 2 To Range(ci & Rows.Count).End(xlUp).Row For j = 1 To Len(Cells(i, ci)) If Mid(Cells(i, ci), j, 1) <> "0" Then Cells(i, cf) = "'" & Mid(Cells(i, ci), j, Len(Cells(i, ci))) Exit For End If Next Next End Sub
Sigue las Instrucciones para ejecutar la macro
- Abre tu archivo de excel
- Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
- En el menú elige Insertar / Módulo
- En el panel del lado derecho copia la macro
- Para ejecutarla presiona F5
Saludos. Dante Amor
Gracias amigo, se ve que tu si sabes, pero te comento que no se puede ejecutar la macro, o quizá no me se todo el procedimiento, porque yo pego toda la macro donde corresponde pero al ejecutarla no pasa nada.
Si pudieras ampliarme más el paso a paso te lo agradecería muchísimo.
Solamente sigue las instrucciones tal y como las puse.
¿En qué columna tienes tus números?
¿Y en cuál columna quieres el resultado?
