Cambiar el color del fondo de un campo de un subformulario dependiendo del valor de otro campo
Expertos, Buenas tardes
Tengo un subformulario que tiene un campo llamado [Chk List], [Valor especificado] y [Valor Tomado]
Y necesito que el dato ingresado en [Valor tomado] sea comparado contra el valor del campo
[Valor especificado], este campo algunas veces es un rango de datos. Dependiendo del valor se deberá colocar un fondo ROJO si el valor esta fuera del rango o un color VERDE si el valor esta en el rango.
Yo tengo el siguiente código que evalúa esta condición, pero he probado colocarlo en diferente eventos
[Después de actualizar], [Al perder enfoque] ... Etc... Pero el color de fondo no cambia, incluso use Formato condicional y sale perfecto, pero preciso realizar esto con código VBA, ¿alguna idea de como colocar el código?
Select Case Me.txtProcesoAT1
Case Is = "R.p.m. Del motor alta en vacío."
If MOTValorTomado >= 2320 And txtValorEspecificado <= 2340 Then
Me.MOTValorTomado.BackColor = vbGreen
Else
Me.MOTValorTomado.BackColor = vbRed
End If
End Select
End Sub
Usare un Select/Case por que tengo que evaluar cerca de 12 diferentes rangos, solo estoy colocando la evaluación para el primer registro.
La pantalla es más o menos así:
Gracias por los aportes. Y un lindo find e semana para ustedes