Pasting on next empty cell

T

TH

Byron,

Use the End Property. Here's the description from HELP:

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.

Syntax
expression.End(Direction)
expression Required. An expression that returns a Range object.
Direction Required Long. The direction in which to move. Can be one of the
following XlDirection constants: xlToLeft, xlToRight, xlUp, or xlDown.
 
Top