Case Else not being reached.
Private Sub nM03KG_AfterUpdate()
Select Case nVcap03
Case Is < 80
Me.nVcap03.BackColor = vbRed
Me.nVcap03.ForeColor = vbWhite
Case Is > 80 < 90
Me.nVcap03.BackColor = RGB(255, 194, 14)
Me.nVcap03.ForeColor = RGB(47, 54, 153)
Case Else
Me.nVcap03.BackColor = RGB(205, 220, 175)
Me.nVcap03.ForeColor = RGB(47, 54, 153)
End Select
End Sub
The first 2 case options work without issue, but! the ‘Case Else’ is never reached.
If I enter say 11,000, this should represent > 90% capacity which is the trigger point for changing the field colour to Green, with Blue Forecolor.