HI Please use this Code
Sub HighLight() Dim rng As Range ActiveCell.CurrentRegion.Select Set rng = Selection ActiveCell.Resize(1, rng.Columns.Count).Interior.Color = 15773695 rng.Cells(rng.Rows.Count, 1).Resize(1, rng.Columns.Count).Interior.Color = 15773696 End Sub Rajan From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] On Behalf Of Chandra Shekar Sent: Wednesday, June 08, 2011 4:01 PM To: excel-macros@googlegroups.com Subject: $$Excel-Macros$$ Current Region Hi, Please find attached file here I want to highlight first and last row of the region, Please let me know how to do this in VBA. Thanks, Chandra Shekar B -- ---------------------------------------------------------------------------- ------ 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
