Just a note, when turning on borders everywhere like this, it isn't necessary to actually "select" them, and you only need to turn on one parameter, the others will get turned on by default.
Dim LR as Long, LC as Long LR = Range("A" & Rows.Count).End(xlUp).Row LC = Cells(1, Columns.Count).End(xlToLeft).Column Range("A4", Cells(LR, LC)).Borders.Weight = xlThin
_________________
Microsoft MVP 2010 - Excel
Visit: Jerry Beaucaire's Excel Files & Macros
If you've been given good help, use theicon below to give reputation feedback, it is appreciated.
Always put your code between code tags. [CODE] your code here [/CODE]
?None of us is as good as all of us? - Ray Kroc
?Actually, I *am* a rocket scientist.? - JB (little ones count!)
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks