Select one row less than xlDown

[xljunkie]

    Range("A5:G5").Select
    Range(Selection, Selection.End(xlDown)).Select

The files I will be using this code on differ in the # of rows so sometimes I will select A5:G100 and other times I might select A5:G150. I want to select one row less at the bottom. So in the first example, A5:G99 and in the second example, A5:G149. Help?

 

[steve the fish]

Range(Selection, Selection.End(xlDown)).Offset(-1, 0).Select

 

[My Aswer Is This]

Try this:

LastRow = Range("A1").End(xlDown).Row

 

[ztodd]

Try-

Range("A5:G5").Select
Range(Selection, Selection.End(xlDown).offset(-1)).Select

 

[steve the fish]

Try this:

LastRow = Range("A1").End(xlDown).Row

That will just produce the number of the last row of contiguous data in column "A" starting from A1.

 

[xljunkie]

Perfect. Thank you guys. I know that was a newbie question but I appreciate it.