Here's one more for you to consider...

Rows((ActiveCell.Row - 2) & ":" & ActiveCell.Row).Select

Although you might want to put in a check to make sure the active cell is at
Row 3 or greater...

If ActiveCell.Row 2 Then Rows((ActiveCell.Row - 2) & _
":" & ActiveCell.Row).Select

And, if you use a With block whose reference is the ActiveCell then either
this...

With ActiveCell
.....
Rows((.Row - 2) & ":" & .Row).Select
.....
End With

or this...

With ActiveCell
.....
If .Row 2 Then Rows((.Row - 2) & ":" & .Row).Select
.....
End With

depending on if you need to check the active cell's row number for being
greater than 2 or not.

--
Rick (MVP - Excel)


"RocketRod" wrote in message
...
Can someone show me the code to select the current row and the 2 above it?