Select a range from active cell

Hi
I am trying to select a specific range (4 rows down, 10 columns right from active cell) in order to cut and paste the selection to another cell within the worksheet.The range might be anywhere within the worksheet so am unable to specify exact range.
I found the following code and would appreciate any help in modifying it to meet my requirements.

Range(ActiveCell, Range(ActiveCell.Address).End _
(xlToRight).End(xlDown)).Select

Thanks in advance
Spagbog

Thanks Dom

Excellent result just what was required.