End Property [Excel 2003 VBA Language Reference]
Returns a Range object that represents the cell at the end of the region that contains the source range. Equivalent to pressing END+UP ARROW, END+DOWN ARROW, END+LEFT ARROW, or END+RIGHT ARROW. Read-only Range object.
expression Required. An expression that returns one of the objects in the Applies To list.
|XlDirection can be one of these XlDirection constants.|
This example selects the cell at the top of column B in the region that contains cell B4.
This example selects the cell at the end of row 4 in the region that contains cell B4.
This example extends the selection from cell B4 to the last cell in row four that contains data.
Worksheets("Sheet1").Activate Range("B4", Range("B4").End(xlToRight)).Select