У меня есть диапазон спецификации, который я хочу, чтобы код условного форматирования ссылался, и заполнял ячейку цветом (или не использовал цвет), если значение выходит за пределы диапазона спецификации. Работает с некоторыми номерами, а не со всеми. Например, если для диапазона низких значений установлено значение 305, а 305 вводится в ячейку данных, он выделяется КРАСНЫМ цветом как не соответствующим спецификации, когда этого не должно быть. Но если диапазон низких значений равен 299 и введен 299, он не выделяется, что именно то, что я хочу. То же самое относится и к высокому спектру.
Имейте в виду, что мои диапазоны низкой / высокой спецификации вытягиваются с помощью vlookup, поэтому я не уверен, что это создает проблему?
Надеюсь, все это имеет смысл.
Спасибо!
Private Sub Worksheet_Change(ByVal Target As Range)
Dim lowspec As Double, highspec As Double
Dim width As Range
Dim C As Range
lowspec = Me.Range("l6")
highspec = Me.Range("p6")
Set width = Intersect(Target, Me.Range("i16:o101"))
Application.EnableEvents = False
If Not width Is Nothing Then
For Each C In width.Cells
v = C.Value
If Len(v) > 0 Then
Select Case v
Case Is < lowspec: newcolor = 3
Case Is > highspec: newcolor = 45
End Select
Else
newcolor = xlNone
End If
C.Interior.ColorIndex = newcolor
Next C
End If
Application.EnableEvents = True
End Sub