Range(ActiveCell.Offset(1, 0), Range("A" &
Rows.Count).End(xlUp)).EntireRow.Clear


--

HTH

Bob Phillips

(remove nothere from the email address if mailing direct)

"Lost in Alabama" wrote in message
...
Hello!

I am trying to create a section of macro to find the first row of data
from
the bottom of the sheet up, select one row down from the ActiveRow to the
end
of the sheet, then Clear the content of the selected rows. The row
location
of the data is always different.

I have tried the folowing, but it does not work. I would greatly
appreciate
help!

Range("A65536").End(xlUp).Select
ActiveCell.Offset(1, 0).Rows("1:65536").EntireRow.Select
Selection.Clear