Rellenar ceros izquierda

[news.microsoft.com]

Tengo unos campos tipo texto, por ejemplo de ancho 10 y con valores
1
12
123
etc...

Me interesa que siempre tenga el ancho maximo 10 añadiendo ceros a la
izquierda, he visto que puedo medir la longitud del campo pero luego no se
como automatizar con VBA que me rellene con ceros a la izquierda, ¿alguien
lo ha hecho o sabe de algun ejemplo?


Saludos
Daniel

[Patxi Sanz]

Hola Daniel:

- Con Format:

? Format("123", "0000000000")

Devuelve 0000000123

- Con Len y String:

? String(10 - Len("123"),"0") & "123"

Devuelve 0000000123

[Chea]

Format() también funciona con cadenas de texto si representan un valor
numérico. Lo que quieres hacer es tan fácil como poner:

CadenaFormateada =Format (MiCampo, "0000000000")
--
Saludos

José Bengoechea Ibaceta [MS-MVP Access]
http://jbengoechea.com/

Post by news.microsoft.com
Tengo unos campos tipo texto, por ejemplo de ancho 10 y con valores
1
12
123
etc...
Me interesa que siempre tenga el ancho maximo 10 añadiendo ceros a la
izquierda, he visto que puedo medir la longitud del campo pero luego no se
como automatizar con VBA que me rellene con ceros a la izquierda, ¿alguien
lo ha hecho o sabe de algun ejemplo?
Saludos
Daniel

[news.microsoft.com]

Gracias a los dos ;P

Daniel

Post by news.microsoft.com
Tengo unos campos tipo texto, por ejemplo de ancho 10 y con valores
1
12
123
etc...
Me interesa que siempre tenga el ancho maximo 10 añadiendo ceros a la
izquierda, he visto que puedo medir la longitud del campo pero luego no se
como automatizar con VBA que me rellene con ceros a la izquierda, ¿alguien
lo ha hecho o sabe de algun ejemplo?
Saludos
Daniel

[Patxi Sanz]

De nada :)