Ayuda con adjuntar 0 en texbox con tamaño predefinido

[Josefran]

Hola buenas tardes espero esten bien, tengo dos dudas

1.- Uso un texbox el cual lo ingreso con un formulario el cual puedo ingresar un CHAR de numeros de 1 a 6 caracteres.

Ocupo que el si ingreso 1 digito se pongan 5 ceros, o si digito un 2 se pongan 4 ceros, En el libro donde lo Guardo.

Ejemplo:

1 - 000001

23 - 000023

431 - 000431

5412 - 005412

67123 - 067123

123456 - 123456

Supongo tendre que sacar la longuitud del campo ingresado y comparlo y si es diferente entones agregarle ceros, pero soy nuevo en visual y no se como hacerlo.

2.-Mi segunda duda es parecida tengo un campo de texto el cual puede aceptar 120 caracteres si ingreso 20 caracteres que se hagan 100 espacios, si ingreso 40 caraceteres se hagan 80 espacios.

[tan178]

Revisa este aporte del Maestro Macro Antonio, pero lo mejor seria que subas un archivo para poder ayudarte .

Validar textbox | Ayuda Excel

[Armando Montes]

Hola, algo asi:

Utilizar un formato de número personalizado para mostrar ceros a la izquierda

[supervoro]

Hola Josefran .... a ver si esto te sirve de orientacion....

TextBox1 = Format(TextBox1, "0000" & Ceros)

Un saludo

[Josefran]

1.-Mi duda es tengo un campo de texto el cual puede aceptar 120 caracteres de maximo si ingreso 20 caracteres que se hagan 100 espacios en blanco, si ingreso 40 caraceteres se hagan 80 espacios. Les dejo la imagen y el codigo en link Gracias.

Supongo tendre que sacar la longuitud del campo ingresado y comparlo y si es diferente entones agregarle ceros, pero soy nuevo en visual y no se como hacerlo.

Dropbox - descripcion.zip

http://imageshack.com/a/img856/4748/cgr4.png

[Josefran]

Resolvi mi segunda duda

con esto

VBA.Space (120 - VBA.Len(TextBox1.Text)) & TextBox1.Text

[supervoro]

Ok.... muchas gracias por aportar la solucion...