Insert x number of rows

[edlim85]

hi all,

How do i code in vb to insert x number of rows, where x is dependent on my calculation in vb.

Possible?


Regards
Edmund

 

[AlphaFrog]

This will insert x rows starting at row 2. In this example, x = 10.

x = 10
Rows(2).Resize(x).Insert

 

[Biz]

Try

Sub InsertRow()
Dim Rng
Rng = InputBox("Enter number of rows required.")
Range(ActiveCell.Offset(0, 0), ActiveCell.Offset(Rng - 1, 0)).Select
Selection.EntireRow.Insert
End Sub

 

[edlim85]

Hi Biz and AlphaFrog,

I would like to thank both for your prompt reply.
What I need is


Rows(2).Resize(x).Insert

</pre> Didnt know the Resize property can be used this way..Now I know

Thanks you