Add Formatting to Last Row of Table via VBA

I have a macro that will create a report. It will overwrite old data and generate a new report each time the macro is run. Since the data length is not consistent, I'm trying to use relative references but struggling with adding a border on the last row of data (the formating gets wiped when I erase the old data).

Basically, I need cells B3:K[LastRow] to have a bottom border. Unfortunately, with the code below, if there is an empty cell in the first row of data, the XLToRight function stops at the open cell and doesn't go all the way to Column K. Column B will always have data in it, so XLDown works no problem.

Please Login or Register  to view this content.

You're the man! Thank you!

I'm about to start a new thread about creating a "double column" report. I have 5 fields in the "first column" of the page and the same five fields in the 2nd column of the report. So columns A:F are "Column 1", column G is a divider cell, and columns H:M are "Column 2".

I'd like to fill all of column 1 data before moving over to column two starting from Cell A4 and moving through to row 35. Instead of moving to row 36, the data (from another sheet), would continue filling in from the top of Column 2 in Cell H4 all the way throuh M35.

Finally, the data resumes populating Column 1 (on page 2) back at Cell A36 and continues that trend until all of the data is reported.

Any ideas on the best way to go about this?