Hi



'    Range("A4:H4").Select
'   Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove

    N = Range("I1").Value

     Range("A3").Select
     Range("A4:H4").Resize(N).EntireRow.Insert

'
In cell I1 I have a value, lets say 7 right

So I want to use that to insert (from colum A to H) 7 rows!

Im fiddiling with the codes above but can't quite seem to come to a solution


From column