Using VBA Macros to insert rows based on cell value

[Xcels]

Hi there,

I am trying to insert 3 rows based on cell value using a macro.

For example:
Starting from the last cell of column D, IF the last cell in column D = 2, I want to copy the entire row and paste it above 3 times. I would want to loop through the rows from bottom up and repeat only if the value in the cell of column D is = 2.

I would really appreciate the help!

Thanks,

 

[Legacy 143009]

So let say, there is 2 on row 10 then, moved to row 7.
While running, the code will find it again on row 7 and will want to move to row 4.

So the logical thing will be is to move 2 to row 7 and skip the step to row 6 but this time you will miss 9 and 8 for checking.

What should be the exact rule?