I would greatly appreciate if somebody could help me out creating a macro.


I need to create a lastRow variable from column B. Im not sure if this will
work.

Dim lastRow As String
lastRow = Range(€œB2€�).End(xlDown).Row


Then I need to loop from A2 to A & lastRow.

During the loop:

If it finds a number 0 in column A

Then store the corresponding number two cells to the right (column C) as a
variable.

Then go over to column D and place number 1s downward (as many times as the
stored variable number).


Any help would be appreciated

--
Regards,

timmulla