• Hi All

    Please note that at the Chandoo.org Forums there is Zero Tolerance to Spam

    Post Spam and you Will Be Deleted as a User

    Hui...

  • When starting a new post, to receive a quicker and more targeted answer, Please include a sample file in the initial post.

loop - help

shajan

shajan

Member
please help with this loop !

Cell B2=23

copy range B6:U6

insert indirect(B2) rows starting at row 7

paste copied range (B6:U6) to all indirect(B2) rows


Thanks.
 
Hi ! Got this code from somewhere else, but not performing as intended, but very close.


Sub insert_rows_equal_to_lineitems()

' This loop repeats a fixed number of times getting its reference from elsewhere


Dim i As Integer


Dim intRowCount As Integer


intRowCount = Range("j4").CurrentRegion.Rows.Count - 1


For i = 1 To intRowCount


'ActiveCell.Offset(1, 0).Select


Call srvlineinsert


Next i


End Sub


Thanks.
 
You must log in or register to reply here.
Back
Top