I finally got around to trying this and got a syntax error...any idea why?
Is 'TheSheet' the name of my worksheet? what does the underline do at end of first line of text?

thx

----- mudraker wrote: -----

GetBottomRow = TheSheet.Cells.Find(what:="*", SearchOrder:=xlByRows, _
SearchDirection:=xlPrevious).Row

range("a1:A" & getbottomrow).select


---
Message posted from http://www.ExcelForum.com/