How can i add rows based on cell value

[iamangelicazxcv]

Hi Excel masters,

I am trying to make a macro, How am I going to add rows like for example

Column C = Schedule lines

If C=3 it will automatically add 1 row
If C = 4 it should add 2 row

up until 10

some people saying it should be done backwards but i dont know how.

and also putting borders in all cells used without specific range

Can you guys pls help me?
So much love and thanks!

ANGIE

 

[Yongle]

Put this in sheet module (right-click on Sheet Tab \ View Code \ paste into the code that appears)

Private Sub Worksheet_Change(ByVal Target As Range)
    On Error Resume Next
    If Target.Column = 3 Then Target.Offset(1).Resize(Target.Value).EntireRow.Insert
End Sub

If a number is entered in any cell in column C then the required number of rows are inserted immediately below
- so if 5 is entered in C2, then blank rows 3,4,5,6 & 7 inserted