This line of code will give you the last row used in column A

RowNo = Range("a" & Rows.Count).End(xlUp).Row


This line of code will give you the row beneath the last used row i
column A

RowNo = Range("a" & Rows.Count).End(xlUp).Row +

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