VBA code for formatting certain cells to include a border

[lgrande]

Good Afternoon,

Looking for help. I am looking for a code that will apply borders to the cells that have data in them in column Column A13 (down till the last populated cell in A13) over to column E13 (to the same last populated cell found in A13. The amt of lines will vary each time. I appreciate any help you can give me.

Thank you,

Linda G

 

[mumps]

Try:

Sub AddBorders()
    Range("A13", Range("E" & Rows.Count).End(xlUp)).Borders.LineStyle = xlContinuous
End Sub

 

[Joe4]

Why not just use Conditional Formatting (no VBA necessary)?

Simply select the cells starting from A13 over to column E down as far as you might ever need to go.
Then go to Conditional Formatting, select the "Use a formula to determine which cells to format" option, and enter in this formula:

=A13<>""

and choose square Border formatting option.

 

[lgrande]

Why not just use Conditional Formatting (no VBA necessary)?

Simply select the cells starting from A13 over to column E down as far as you might ever need to go.
Then go to Conditional Formatting, select the "Use a formula to determine which cells to format" option, and enter in this formula:

=A13<>""

and choose square Border formatting option.

Thank you. I will try that

 

[lgrande]

Try:

Sub AddBorders()
    Range("A13", Range("E" & Rows.Count).End(xlUp)).Borders.LineStyle = xlContinuous
End Sub

Thank you very much

 

[Joe4]

Note that when you mark a post as the solution, please mark the original post containing the solution, and not your own post acknowledging that some other post is the solution.
I have updated this thread for you.

 

[mumps]

You are very welcome.