Assuming you mean you want to select entire rows, give this a try...

Dim LastRow As Long
LastRow = ActiveSheet.Cells.Find(What:="*", SearchOrder:=xlRows, _
SearchDirection:=xlPrevious, LookIn:=xlFormulas).Row
If LastRow 1 Then Range("2:" & LastRow).Select

--
Rick (MVP - Excel)



"Anita" wrote in message
...
Hi - I am using v2007 and want to know code for selecting from row 2 to
the
end of populated data in a spreadsheet. The length of the data will vary
everytime. Any help gratefully nreceived. Thanks. Anita