Quitar ceros a la izquierda

Hola Lucho,

Suponiendo que la celda en cuestion es [A1], prueba la siguiente formula
MATRICIAL (se debe introducir mediante Ctrl+Shift+Enter, no solo Enter):

=EXTRAE(A1;COINCIDIR(VERDADERO;EXTRAE(A1;FILA(INDIRECTO("1:"&LARGO(A1)));1)<>"0";0);LARGO(A1))

o bien:

=EXTRAE(A1;COINCIDIR(1;--(EXTRAE(A1;FILA(INDIRECTO("1:"&LARGO(A1)));1)<>"0");0);LARGO(A1))

Saludos,
KL


"Lucho" wrote in message
news:053001c5c1e2$574a6470$

Amigos,

Por favor alguna funcion, formula o codigo VBA para
eliminar ceros a la izqiuerda de una cadena, sin eliminar
los ceros a la derecha de las letras, por ejemplo:

000000AB051
0000CX00035

Gracias