Logo 
Search:

MS Office Answers

 Ask Question   UnAnswered
Home » Forum » MS Office       RSS Feeds
  Question Asked By: Darla Morrison   on Aug 25 In MS Office Category.

Conditional Formatting Or Select Case


  
Question Answered By: Ned Storm   on Aug 25

If Range("b" & Target.Row).Value = 1 Then
If Range("d" & Target.Row).Value < Range("d65530") - 0.07 Or Range("d" &
Target.Row).Value > Range("d65530") + 0.07 Then
Range("d" & Target.Row).Font.ColorIndex = 3
Else
Range("d" & Target.Row).Font.ColorIndex = 1
End If
End If
If Range("b" & Target.Row).Value = 2 Then
If Range("d" & Target.Row).Value < Range("d65529") - 0.07 Or Range("d" &
Target.Row).Value > Range("d65529") + 0.07 Then
Range("d" & Target.Row).Font.ColorIndex = 3
Else
Range("d" & Target.Row).Font.ColorIndex = 1
End If
End If
If Range("b" & Target.Row).Value = 3 Then
If Range("d" & Target.Row).Value < Range("d65532") - 0.05 Or Range("d" &
Target.Row).Value > Range("d65532") + 0.05 Then
Range("d" & Target.Row).Font.ColorIndex = 3
Else
Range("d" & Target.Row).Font.ColorIndex = 1
End If
End If
If Range("b" & Target.Row).Value = 4 Then
If Range("d" & Target.Row).Value < Range("d65531") - 0.05 Or Range("d" &
Target.Row).Value > Range("d65531") + 0.05 Then
Range("d" & Target.Row).Font.ColorIndex = 3
Else
Range("d" & Target.Row).Font.ColorIndex = 1
End If
End If
i use this code and its work good
but i need to use conditional  formatting Or Select Case

Share: 

 

This Question has 4 more answer(s). View Complete Question Thread

 
Didn't find what you were looking for? Find more on Conditional Formatting Or Select Case Or get search suggestion and latest updates.


Tagged: