try
lastrow = Sheets("Sheet12").Cells.Find("*", searchdirection:=xlPrevious).Row
MsgBox lastrow

--
Don Guillett
SalesAid Software

"larry" wrote in message
...
is it possible to get the last row of a range,

where the range spans several columns of data?