Apply cell border formatting to all sheets in workbook

[carlito2002wgn]

Hi,

I have a workbook with several sheets. Each sheet has data in column K. K1 is a header. Below that are numbers, but each sheet has a different number of rows. At the end of the numbers is a single blank row. Below the blank row is a total of all of the numbers in column K.

So, for example, K1 has "Header", K2 contains "1", K3 contains "2", K4 is blank, and K5 contains "3" (sum of K2 and K3). But, on the next sheet, there might be 30 rows of numbers.

I am looking for help with adding cell borders around the total. In the example above, cell K5.

I tried the below code, but to no surprise at all, it doesn't work:

Please Login or Register  to view this content.

Help, Please!

[jeffreybrown]

Try...

Please Login or Register  to view this content.

[carlito2002wgn]

Thank you, Jeffrey,

Your code works perfectly. The only problem is that the borders are not the ones that I want. That's my fault, obviously.

I want a thin line at the top of the cell, and double thin lines at the bottom of the cell. No vertical or horizontal lines. If I use the record function and add the borders that I want, here is what Excel produces:

Please Login or Register  to view this content.

[jeffreybrown]

How about...

Please Login or Register  to view this content.

[carlito2002wgn]

Thanks again! It worked like magic.

Now, I realize I should have asked this earlier, but if I wanted to apply that same formatting, following the same logic, to columns L & M, should I just rewrite that same macro two more times substituting the column letters, or is there a better way?

[jeffreybrown]

How about...

Please Login or Register  to view this content.

[carlito2002wgn]

Wizardry! Pure wizardry.

Thank you so much!

[jeffreybrown]

You are very welcome and thanks for the feedback.