Cell Activation After Sort 1

[thunderkid]

I am using VBA codes to sort hundred of rows on a sheet. However, after the sort I have to scroll down to the last row to add a new row. How do I activate (if that is the correct term) on the cell after the last row. I have tried the following:

Range(Selection, Selection.End(xlDown)).Offset(1,0).Activate

This code highlights the column of the active cell, but the active cell is at the uppermost cell in the selected column.

Any hints would be appreciated.

 

[melone]

Couldn't you just select the bottom-most row (65536) in the column, and do a xlUp?

Range("A65536").Select
Selection.End(xlUp).Select

That will select the last element in the the column.

 

[thunderkid]

melone,
Your solution worked perfectly! Working from the bottom up approaches the task from a different perspective. Thanks again. Have a star!

Thunderkid