Sub selectrngfromactivecell()
ActiveCell.Resize(4, 1).EntireRow.Select
End Sub
or
Sub srfac()
Rows(ActiveCell.Row).Resize(4).Select
End Sub
--
Don Guillett
SalesAid Software

"MahD" wrote in message
...
I need a macro to run relative to the current selected cell so that, if I
click the macro button the (eg.) whole current row will be selected along
with the four below, etc. - and not the the specific row from which I
started
recording the macro.

Can anyone suggest a way?
Is there a code that refers to the current position?

Many thanks,
Mary