yep sure u betchya, hours of attempts, and get a start with item right after
I posted, thanks, got:

ActiveCell.Offset(100, 0).Select


"Jim Thomlinson" wrote:

Range(ActiveCell, ActiveCell.Offset(100, 0)).Copy

or

Range(ActiveCell, ActiveCell.Offset(100, 0)).Select
--
HTH...

Jim Thomlinson


"MrDave" wrote:

hi, I have some examples been trying, but cannot get a selection of 100 rows
down, from the current cell, that column only. any help appreciated, thanks.

some stuff trying: (with many variations)

Sub Copy() 'alt-, (comma) wip: copy column 190 rows down from active
cell, pending
'reduce all windows, restore main window, pause conflict with ie, etc.
click button does not work

'Rows(ActiveCell.Row).Select
Cells(ActiveCell.Cells).Select
'Rows(ActiveCell.Row) Offset(0, 180).Select
'.Offset(0, 180).Select
'Selection.Copy

'ActiveWindow.LargeScroll Down:=4

'Columns(ActiveCell.Column).Select
'Rows(ActiveCell.Row).Select
'Selection.Copy
End Sub