How do I create a macro that will automatically input lines?

[cporter]

I am trying to create a macro that will delete lines based on a number that
is inputted in a particular cell. For instance if the number is cell A1 is
10 then input 10 rows for data.

 

[Bob Phillips]

Rows(10).Resize(Range("A1").Value).Delete

--

HTH

Bob Phillips

(remove nothere from the email address if mailing direct)