Validación y truncamiento de datos en Formularios
Para poder explicarme mejor coloco la programación que hice:
Private Sub CommandButton4_Click()
Celular = Trim(TextBox1.Value)
If Len(Celular) = 9 Then
MsgBox "Celular Válido"
Else
MsgBox " Verificar cantidad de números digitados"
End If
End Sub
Ahora el problema es que no quiero que el usuario siga avanzando a la siguiente pregunta del formulario sin antes haber dado click al COMMAND VALIDACIÓN y verificar que la cantidad de números que ingreso es correcta o no.
Gracias de antemano,
Steve
1 respuesta
Esto es un ejemplo de lo que entendí, no puedes avanzar si las validaciones no se cumplen.
Private Sub CommandButton4_Click()
If Len(Trim(TextBox1.Value)) <> 9 Then
MsgBox "Verificar cantidad de números digitados"
Exit Sub
End If
'Siguiente validación
If TextBox2 = "" Then
MsgBox "llenar textbox2"
Exit Sub
End If
'Otra validación
If TextBox3 = "" Then
MsgBox "llenar textbox3"
Exit Sub
End If
'Si pasa las validaciones entonces continua con el códgio
'inicio código
'fin código
End Sub Saludos.Dante Amor
Si es lo que necesitas.
https://www.dropbox.com/s/9vec21qdkn3inaq/Ejemplo%20TOTAL%20FORMULARIOS.xlsm
Para dejar entenderme mejor adjunto el ejemplo que estoy realizando.
Ahora al lado del primer label que dice NÚMERO hay un TEXTBOX que solo permite escribir números y al lado un COMMAND que dice VALIDAR, ahora lo que yo necesito es que el usuario no pueda avanzar a la siguiente pregunta sin antes haber pulsado el COMMAND VALIDAR.
Gracias de antemano nuevamente,
Steve
¿Y cuál es la siguiente pregunta? Eso es lo que no entiendo.
Creo que me exprese mal, no la siguiente pregunta sino al siguiente textbox que en este caso es el TEXTBOX de PRIMER NOMBRE.
Saludos
