Quería saber como podría hacer para validar dos Inputbox y que por ejemplo, si el usuario ingresa mal un dato en el 2do Inputbox, no tener que finalizar el sub con un exit y que el usuario no vuelva a ingesar los datos desde el primer Inputbox en vez de reingresar los datos del 2do Inputbox que fué el cual ingresó mal los datos.
Pongo el ejemplo por las dudas:
Código:
Private Sub cmdMostrar_Click()
Base = InputBox("Ingrese la base del triángulo")
If Base = "" Then
MsgBox "Ingreso cancelado"
Exit Sub
Else
If Not IsNumeric(Base) Then
MsgBox "Ingrese números"
Base = ""
Exit Sub
End If
End If
Altura = InputBox("Ingrese la altura del triángulo")
If Altura = "" Then
MsgBox "Ingreso cancelado"
Exit Sub
Else
If Not IsNumeric(Altura) Then
MsgBox "Ingrese números"
Base = ""
Exit Sub ------> Si el usuario ingresó el dato en letras, que no de salida el sub y el usuario tenga que volver a cargar desde el primer Inputbox y que vuelva a reingresar desde el 2do.
End If
End If
Saludos!!!
