Excellent ashish, it's work nowthanks a lot
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 Date: Mon, 4 Jul 2011 22:18:37 +0530 Subject: Re: $$Excel-Macros$$ How Can I Clear Content & Autofill From: koul.ash...@gmail.com To: excel-macros@googlegroups.com try this code- Private Sub Worksheet_Change(ByVal Target As Range) Dim cell As Range Dim abc As Range If Target.Column = 19 Then Set abc = Range("s" & Target.Row & ":s" & Target.Row + Target.Rows.Count) For Each cell In abc Select Case cell.Value Case "A" cell.EntireRow.Interior.Color = RGB(192, 192, 192) Case "B" cell.EntireRow.Interior.Color = RGB(0, 0, 255) Case "C" cell.EntireRow.Interior.Color = RGB(255, 255, 0) Case Else cell.EntireRow.Interior.Color = xlNone End Select Next cell End If End Sub On Mon, Jul 4, 2011 at 9:44 PM, Ahmed galal <ahmed.ga...@live.com> wrote: I'll explain what the problem:-try to pull + for cell to auto fill code like "A" into 3 cells down it will return error, also if u select more than one cell including codes and delete selection contents it returns error also. Date: Mon, 4 Jul 2011 21:27:49 +0530 Subject: Re: $$Excel-Macros$$ How Can I Clear Content & Autofill From: koul.ash...@gmail.com To: excel-macros@googlegroups.com try this see if it helps Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 19 And Target.Count = 1 Then Select Case Target.Value Case "A" Target.EntireRow.Interior.Color = RGB(192, 192, 192) Case "B" Target.EntireRow.Interior.Color = RGB(0, 0, 255) Case "C" Target.EntireRow.Interior.Color = RGB(255, 255, 0) Case Else Target.EntireRow.Interior.Color = xlNone End Select End If End Sub On Mon, Jul 4, 2011 at 7:51 PM, Ahmed galal <ahmed.ga...@live.com> wrote: Hi all I choose a specific Column Such as X Column and when one cell change it's return a value in another cell in another column. now i need to make Auto-fill or Clear Content to act on all row content, plz see the attachment 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.posterous.com/ akoul.wordpress.com My Linkedin Profile 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 -- ---------------------------------------------------------------------------------- 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.posterous.com/ akoul.wordpress.com My Linkedin Profile 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 -- ---------------------------------------------------------------------------------- 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
