View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Jim Jackson Jim Jackson is offline
external usenet poster
 
Posts: 324
Default Conditional formating

In that case, use this:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 14 And Target.Value = 1 Then
Range(Target.Offset(0, -13), Target.Offset(0, -9)).Interior.ColorIndex = 6
End If
End Sub
--
Best wishes,

Jim


"JOM" wrote:

I tried to modify the code so that it accomodates the coloumn N2-N10 and the
rows that need to change are from 2-10 column B-f each conciding with its own
value in N so if N7 is 1 then the row 7 will have the highligt. but its not
working..

"Jim Jackson" wrote:

You can make it run with this:
After loading this in the sheet's code window, type a number in N2.

This runs automatically whenever a cell's value is changed.

Private Sub Worksheet_Change(ByVal Target As Range)
Highlight
end sub
--
Best wishes,

Jim


"JOM" wrote:

Ok I put that in the VB editor, what am I supposed to do next because I don't
see it highlighting...

"Jim Jackson" wrote:

Sub Highlight()
If Range("N2") = 1 Then
Range("B2:F2).Interior.ColorIndex = 6 ' or the color of your choice
End Sub

ColorIndex ranges from 1 to 56
--
Best wishes,

Jim


"JOM" wrote:

I would like to highlight row b2 to F2 if N2 is equal 1 how do I do that