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

Preguntas similare

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
Respuesta Responder a este mensaje
#2 Edison Torres
22/11/2005 - 20:09 | Informe spam
Gracias Marcelo ya lo hice y me resulto pero ahora quiero saber como hago
para que al momento de ingresar solo me acepte texto y no numeros ni espacios
en blanco.

Saludos

"Marcelo P. - El Hierro" escribió:

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



email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida