Perhaps...

Range(ActiveCell, ActiveCell.End(xlUp)).Select
--
HTH...

Jim Thomlinson


"Jim Tibbetts" wrote:

Below is a snippet of code that finds the first empty column and pastes
information down the column. I want to select the newly pasted range for
editting. The last line does in fact select the proper range of cells after
pasting, but results in the following error message:

Run-time error "1004":
Method 'range' of object '_global' failed

Worksheets("Aggregates").Select
Range("A3").End(xlToRight).Offset(0, 1).Select
ActiveSheet.Paste
Range(ActiveCell.Address & ActiveCell.End(xlUp)).Select

Any help appreciated,
--
Jim T