Insert rows based on condition

[wilhelm]

Hello, I can't find a solution for my problem. I need a macro to insert new rows and copy values from columns in the row ahead to the new lines. Column A is company name and Column C is text that belong to the company. Column B is number of periods, and I need it to be until 5 periods for all cases. It hasn't to start with 1 but to be up to 5.

Here is what is look like:
A1: X B1: 1 C1: abc
A2: X B2: 2 C2: abc
A3: X B3: 3 C3: abc
A4: Y B4: 2 C4: ced
A5: Y B5: 3 C5: ced
A6: Y B6: 4 C6: ced
A7: Z B7: 4 C7: efg
A8: Z B8: 5 C8: efg

And here is how I want it

A1: X B1: 1 C1: abc
A2: X B2: 2 C2: abc
A3: X B3: 3 C3: abc
Insert 2 rows:
A4: X B4: 4 C4: abc
A5: X B5: 5 C5: abc

A6: Y B6: 2 C6: ced
A7: Y B7: 3 C7: ced
A8: Y B8: 4 C8: ced
Insert 1 row:
A9: Y B9: 5 C9: ced

A10: Z B10: 4 C10: efg
A11: Z B11: 5 C11: efg
Insert no row


Thanks a lot!