Copy cells based on multiple cell values

Afternoon all.

Need a bit of help here, I am quite new to VBA and not very good at it either.

I will try and explain what I need as best I can. Please refer to the attached spreadsheet.

In column A I have a list of pipes.( Column A is Upstream and B is Downstream)
In columns G H I ...... etc. are points at which these pipes are split up.

I basically have to work out chainage.

In column AV is a list of the number of times they have to be split up.
So for example

1 means I only have to reference that pipe 1.
2 means twice : therefore i need two rows in a column. Ideally the first row will have the pipe reference and the second will be blank.
3: 3 rows etc etc



So in short I need a vba to copy and paste a cell the amount of times as listed in column AV.

Any ideas?

Thanks for your help!

You mean this?

Please Login or Register  to view this content.

Not sure if my reply worked.

But I said thanks for that nearly worked perfectly. But it puts an extra row in.
So wehre i have count 1 I want it to stay.
count 2 inserts 1 extra.
count 3 inserts 2 extra.
Thanks for the quick reply

Sub macro_1()
Dim count
For count = Range("A" & Rows.count).End(xlUp).Row To 3 Step -1
Rows(count + 1 & ":" & count + Range("AV" & count)).Insert
Rows(count).delete
Next
End Sub

Umm. that just deleted everything

ha oops

Please Login or Register  to view this content.

You beautiful person !!!
Now the next job. There will probably be another thread by me in about an hour once I start struggling with that bit too!!!