Ayuda TextBox

19/11/2005 - 17:20 por Edison Torres | Informe spam
Hola les cuento tengo un formulario hecho en VBA para excel y estoy
utilizando un
TextBox pero no se como hacer que solo me acepte numeros (maximo 10 digitos)
y si el usuario ingresa espacios en blanco o cualquier palabras que le envie
un mensaje indicando que el campo es numerico y si ingresa el 0(cero) que le
envie un mensaje indicando "Campo no puede ser menor o igual a cero"

Por favor si es mucho pedir me pueden ayudar con el codigo en VBA para Excel

Gracias por todo
 

Leer las respuestas

#1 Marcelo P. - El Hierro
21/11/2005 - 18:34 | Informe spam
Hola Edison.
Para lograrlo tienes que comparar el caracter capturaco en cada pulsacion.
Esto lo haces con el evento KeyPress de tu control, en este caso Text Box.
-
Private Sub BOX_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
'para que solo sean numeros, el valor de KeyAscii debe ser mayor que 47
'y menor que 58

If KeyAscii THEN
Else

End If
End Sub
-

Aunque breve, espero te sirva de algo

Un saludo

Preguntas similares