Range selection help!

[snuffnchess]

I am using the following code to select all of the cells and then fix the font, etc.

Problem is there is sometimes non-continguous data past what it is selected as the last column....

Sample i am working on selects all of the data from A1 to U35.... but there is data in v1:y4 that is not being captured.

how do i get it to grab the data that is in v1:y4 also? If it helps, i do have column Y defined elsewhere as long

Range("A1", Range("A1").End(xlDown).End(xlToRight)).Select

Cells.Select does work, but it then grabs ALL of the cells on the sheet, rather than a1:y35 (the row counts and column counts do change based on the sheet... but the last column is always called "apptcol"

[MarvinP]

Try this:

Dim LastRow as Double
Dim LastCol as Double

LastRow = Cells(Rows.Count,"A").End(xlUp).Row
LastCol = Cells(1,Columns.Count).End(xlToLeft).Column

Range(Cells(1,"A"),Cells(LastRow,LastCol)).Select

If you want to look cool this one line does the above also, if you have no blank rows or columns in your range of data.

Cells(1,"A").CurrentRegion.Select

Here is a way to test what excel thinks the CurrentRegion is. Click on a cell and press Ctrl+A. This shortcut will select the CurrentRegion from that cell.

[snuffnchess]

Thank you so much!!!!

[MarvinP]

I added to my answer so you might want to reread it again.