+ Reply to Thread
Results 1 to 4 of 4

code to put borders around all used cells

Hybrid View

  1. #1
    Forum Expert JBeaucaire's Avatar
    Join Date
    03-21-2004
    Location
    Bakersfield, CA
    MS-Off Ver
    2010, 2016, Office 365
    Posts
    33,492

    Re: code to put borders around all used cells

    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 the icon 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!)

  2. #2
    Valued Forum Contributor
    Join Date
    11-16-2004
    Location
    Devon UK
    MS-Off Ver
    2010
    Posts
    357

    Re: code to put borders around all used cells

    Thank you guys, Both solutions worked ;-)

+ Reply to Thread

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts

Search Engine Friendly URLs by vBSEO 3.6.0 RC 1