Sub CurRegLoopHighLightBorderTopBot()
Dim objArea As Object
For Each objArea In ActiveSheet.UsedRange.SpecialCells(2).Areas
With objArea: .Rows(1).Cells.Interior.Color =
65535: .Rows(.Rows.Count).Cells.Interior.Color = 15773696: End With
Next
End Sub
On Jun 9, 10:42 am, Chandra Shekar <chandrashekarb....@gmail.com>
wrote:
> Thanks for the reply. How to put loop if we have more than one current
> region. Thanks!
>
> Regards,
>
> Chandra Shekar B
>
> On Wed, Jun 8, 2011 at 8:06 PM, Rajan_Verma <rajanverma1...@gmail.com>wrote:
>
>
>
>
>
>
>
> > 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 athttp://www.excel-macros.blogspot.com
> > 4. Learn VBA Macros athttp://www.quickvba.blogspot.com
> > 5. Excel Tips and Tricks athttp://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 athttp://www.excel-macros.blogspot.com
> > 4. Learn VBA Macros athttp://www.quickvba.blogspot.com
> > 5. Excel Tips and Tricks athttp://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
