Private Sub Worksheet_Change(ByVal Target As Range) If Target.Count = 1 And Target.Column = 19 Then Range("a" & Target.Row).Interior.Color = RGB(192, 192, 192) Range("b" & Target.Row).Interior.Color = RGB(192, 192, 192)
Range("d" & Target.Row).Interior.Color = vbYellow Range("c" & Target.Row).Interior.Color = vbYellow Range("r" & Target.Row).Interior.Color = RGB(255, 0, 0) Range("w" & Target.Row).Interior.Color = vbGreen End If End Sub On Sun, Jul 3, 2011 at 5:45 PM, Ahmed galal <ahmed.ga...@live.com> wrote: > > Hi all, > I need to know how to use Event Change to Change Color of Row according to > changing in specified Column cells. > for example: > I have column "S" any cell in it take code A,B,C,D,R & W. > I need when any cell change in the column "S" taken one of the previous 6 > codes, then the Row of it change to specified color > A,B = Grey Color > C,D = Yellow color > R = Reed Color > W = Green Color > > > Best regards, > > > > *Ahmed galal Mohamed* > > Procurement Engineer > > Head Office : SQUARE Engineering Firm > Tel :(202) 2402 8846 > Fax :(202) 2405 0476 > Mobile :(010) 9 62 60 61 > Website : http://www.square.com.eg > 31 Lebanon St. Mohandsen, Giza, Egypt > > > > -- > > ---------------------------------------------------------------------------------- > Some important links for excel users: > 1. Follow us on TWITTER for tips tricks and links : > http://twitter.com/exceldailytip > 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 > 3. Excel tutorials at http://www.excel-macros.blogspot.com > 4. Learn VBA Macros at http://www.quickvba.blogspot.com > 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com > > To post to this group, send email to excel-macros@googlegroups.com > > <><><><><><><><><><><><><><><><><><><><><><> > Like our page on facebook , Just follow below link > http://www.facebook.com/discussexcel > -- *Regards* * * *Ashish Koul* *akoul*.*blogspot*.com <http://akoul.blogspot.com/> http://akoul.posterous.com/ *akoul*.wordpress.com <http://akoul.wordpress.com/> My Linkedin Profile <http://in.linkedin.com/pub/ashish-koul/10/400/830> P Before printing, think about the environment. -- ---------------------------------------------------------------------------------- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com <><><><><><><><><><><><><><><><><><><><><><> Like our page on facebook , Just follow below link http://www.facebook.com/discussexcel