Copy and Paste Cell X number of times based on Adjacent Cell

Assuming names running A1:A4, numbers B1:B4:

Please Login or Register  to view this content.

Originally Posted by daffodil11

Assuming names running A1:A4, numbers B1:B4:

Please Login or Register  to view this content.

Thanks for the fast reply I'll try it out now, would you happen to know of any resources that I can refer to for learning Macro's?

Or build list in array and write to worksheet in 1 go.

Please Login or Register  to view this content.

Delete the word function before Sub.

BTW
There were 3 different codes provided. Did you even try the other 2?

Originally Posted by GabeGabe

Hi
For clarification, I am using Google Sheets App Script Editor.

I am getting the error
Missing ( before function parameters.

function Sub CopyDown()
Dim i As Long, lr As Long
With ActiveSheet
lr = .Cells(Rows.Count, 1).End(xlUp).Row
For i = lr To 2 Step -1
.Cells(i + 1, 1).Resize(.Cells(i, 2).Value - 1).EntireRow.Insert
.Cells(i, 1).Resize(.Cells(i, 1).Offset(, 1).Value) = .Cells(i, 1).Value
Next
End With
End Sub

The sub procedure is not written as a function and would not work as a UDF. You could use it with a Form Controls button which can be created by going to your Developer menu on the ribbon, Click Insert then click on the command button from the Forms Control tool box. Place the button where you want it to appear on the worksheet by moving the mouse pointer corsshairs (+) to that location and left click. A dialog box will pop up that has 'Assign Macro' option. Click that to get the Macro dialogs box and assign the macro to the button. Later versiions of Excel go directly to the macro dialog box when the button is created.