Primero crearemos un userform el cual tendrá dos textbox, uno de los textbox solo permitirá el ingreso de números y el otro solo permitirá el ingreso de letras.
1) Para validar el ingreso de números en el primer textbox tendremos que introducir el siguiente código relacionado al evento textbox1.Change:
Private Sub TextBox1_Change()
If Not IsNumeric(TextBox1.Text) And _
TextBox1.Text <> "" Then
Beep
MsgBox "Se debe ingresar solo números"
TextBox1.Text = ""
TextBox1.SetFocus
End If
End Sub
El código indica mediante el condicional IF, que si lo ingresado en el textbox1 no es un valor numérico y a la vez no se trate del caso en el que el textbox se encuentre vacío (por ejemplo en caso ingrese un numero y lo borre) borre el carácter ingresado y envié el mensaje “Se debe ingresar solo números a través de un msgbox
2) Para validar el ingreso de text0 en el Segundo textbox tendremos que introducir el siguiente código relacionado evento textbox2.Change:
Private Sub TextBox2_Change()
If IsNumeric(TextBox2) And _
TextBox2.Text <> "" Then
Beep
MsgBox "Se debe ingresar solo Texto"
TextBox2.Text = ""
TextBox2.SetFocus
End If
End Sub
El código indica mediante el condicional IF, que si lo ingresado en el textbox2 es un valor numérico borre el carácter ingresado y envié el mensaje “Se debe ingresar solo texto a través de un msgbox
Validar ingreso de numeros y Texto a un Textbox
Elaborado por: Luis Agustin Gaitan Murillo
05/06/2015 a las 10:43 pm
Hay alguna forma que luego de escribir todo el dato ya sea número o texto, aparesca la ventana de que no es correcto y no defrente al digitarlo.
08/06/2015 a las 11:58 pm
Hola Claudia,
Me parece que una forma de que te aparezca una ventana con un mensaje de alerta es validando tu dato directamente en el textbox y ya no en el commandbutton. Aqui te dejo un ejemplo, espero que te sirva
Private Sub TextBox1_Change()
If IsNumeric(TextBox1.Text) Then
x = Cells(Rows.Count, 8).End(xlUp).Row
Cells(x + 1, 4) = TextBox1
Else
Beep
MsgBox "La edad introducida no es valida", vbCritical, "Aviso"
End If
End Sub
07/06/2015 a las 12:18 pm
¿Qué debería hacer si quisiera validar un texto conformado por tres letras y dos número? sería como una combinación. Si lo valido con IsNumeric podría aceptar más de 2 números después de letras.
11/07/2015 a las 3:23 pm
antes que todo, gracias, mi duda oconsulta es la sgte., tengo un listado,
ejemplo del texto;
11,12,4,13,36,22
estos resultados los arroja un calculo,que son puestos en una celda, pero necesito separar cada numero en celdas independientes, como ppodria ser para elegir cada numero que esta separado con comas y ponerlos en celdas independientes, para ocuparlos en otros calculos o datos?.
ojala me puedan ayudar
14/06/2016 a las 10:02 pm
buena noches, gracias por lo que puedan ayudarme, soy un principiante en el uso dvbase, tengo un userform el cual lo utilizo para ver los datos relacionados de un codigo con una caja combobox y las cajas textbox para los datos que relaciona el codigo, tengo el la columna de codigo valores alfabeticos y numericos, cuando llamo a ver codigo alfabetico no me trae la informacion relacionada a este pero si es numerico si me trae toda la informacion relacionada al codigo. Cual seria el erros y su solucion?. Gracias de antenamo por su ayuda. Veo varios comentarios y soluciones de los cuales se puede aprehender mucho.
ae.
18/06/2016 a las 12:31 am
necesito delimitar el ingreso de valores en un text box que el minimo sea 1 y el maximo 10 como lo hago???
por su ayuda gracias
01/07/2016 a las 5:04 pm
Quizá podría emplear algo similar a:
If Val(TextBox1.Value) > 10 Or Val(TextBox1.Value) < 1 Then
MsgBox "Se debe ingresar solo números entre 1 y 10 "
End If
04/07/2016 a las 6:29 am
Buenos días. Alguien me puede dar una mano con la siguiente macro? Tengo un combobox que chequea una columna de datos (a1:a100), luego con un botón mueve el dato seleccionado en el combox y lo dirige a una celda determinada. Lo que necesito es que si se escribe manualmente un valor que no este en el listado del combobox (los de la columna a1:a100) que me arroje un mensaje de error. Por ej: "parámetro invalido". MUCHAS GRACIAS POR SU AYUDA!
11/10/2016 a las 4:34 pm
HOLA QUISIERA QUE AL MOMENTO DE ESCRIBIR EN UNA CAJA DE TEXTO CADA 3 NUMEROS ME INGRESE AUTOMATICAMENTE LA COMA Y EN OTRA IGUAL PERO EN VEZ DE COMA PUNTO ME PUEDEN AYUDAR
POR EJEMPLO QUE SEA ASI 111,111
24/10/2016 a las 12:44 am
que modificar al código para que solo admita texto y no números en ningún lugar?
22/07/2018 a las 1:45 pm
¡Buenas tardes! Estoy en Brasil, quiero felicitarte por tu trabajo. ¡ necesito este sistema para mi trabajo, pero el sistema no acepta el código de mis productos! Comete un error. Ejemplo de mis códigos: JCCDECPP0006. Incluye Letras y números.
18/04/2021 a las 3:24 am
saludos como se podria validar en un textbox (Formulario) el ingreso de una sola letra en dicho textbox ejemplo solo permita la letra X no numeros, no espacios vacios, solamamente la letra X gracias