inserting new lines with number

[tripflex]

Alright here's the deal. I have a sheet that has a list of items,
quantities, unit price and extended price. Right now they are numbered 1-20
but they are on row 11 - 30.

You can see a screen shot here to see what i mean

http://img134.imageshack.us/img134/2361/excelh.jpg

Well anyways, i want to see if anybody knows how i would be able to insert a
new line and put the corresponding number in there.

So lets say for instance i need 50 items instead of only 20. I wanted to
see if anybody knows how i would be able to write a macro where it will
automatically add new lines below 20, and go all the way through 50.

So after running the macro it will go from only being 20 to being 50 or
however many items are needed.

This will help me out a very lot and save me a lot of time if someone might
be able to assist me with this.

Thank you for your time and help.

 

[Sheeloo]

This little macro will do the job...
Sub test()
Cells(31, 1).Select
For i = 50 To 21 Step -1
ActiveCell.EntireRow.Insert
ActiveCell.Value = i
Next
End Sub

 

[tripflex]

What about if i want to keep the information in those cells to have it repeat
whenever it creates a new one, and so that it goes up in numbers, like the
first one it would make the first cell would be 21, then 22, then 23, etc ,etc

Thanks!