Why would you want to do this?

Sub selectall()
Range(Cells(ActiveCell.Row, "a"), Cells(65536, "a")).EntireRow.Select
End Sub


--
Don Guillett
SalesAid Software

"Jason" wrote in message
...
I'm a beginner, and need some code that will do the following. Suppose I
have cell C10 selected. I want the macro to look at the current
selection,
and then highlight the entire rows from the current selection down to the
last row (meaning 65,000+). Thanks