Worksheets("Sheet1").Rows(97).Delete

--
__________________________________
HTH

Bob

<kirkm wrote in message ...
Could someone please give a code exaple
to delete a row in Sheet1 by row number. Whether it's empty or not
and close up the gap.

Thanks - Kirk