Controlar con un IF un intervalo de números.
Necesito evaluar tres intervalos numéricos: 1) Que [NUMERO] varíe entre 0 y 5 inclusive; 2) Que [NUMERO] lo haga entre 6 y 59 y 3) Que [NUMERO] lo haga a partir de 60 inclusive.
El primer intervalo lo controlo con un simple If Me.NUMERO >= 6, el tercero con un If Me.NUMERO >= 60… pero no logro controlar el tercer intervalo.
1 Respuesta
Te dejo el código con los IF. Lo dejé en un control del tipo CommandButton, que evalúa el contenido de un TextBox. Aclaro estos detalles para que hagas los cambios necesarios.
Private Sub CommandButton1_Click() Dim NUMERO As Integer 'declaración de la variable NUMERO NUMERO = Val(TextBox1) If NUMERO < 6 Then MsgBox "Se eligió el 1er intervalo" ElseIf NUMERO <= 59 Then MsgBox "Se eligió el 2do intervalo" Else MsgBox "Se eligió el 3er intervalo" End If End Sub
PD) Tengo aún abierta otra consulta de tu autoría. Lamentablemente recién la veo hoy revisando tu historial, ya que el sitio dejó de enviarnos notificaciones.
Me da 'Error de compilación: No se ha definido la variable'
Este problema, que puede aparecerte en más de una respuesta que recibas en el foro, es porque no hay obligatoriedad de declarar las variables si así está configurado nuestro Editor.
Ahora, en esta macro de hoy ya te la dejé declarada... pero hay mucho aún para comentar sobre este tema ;)
Sdos.
Elsa
* Acabo de publicar mi último manual: 500Macros+365. Demo y contenidos aquí:
