Duplicating rows based on data in column

[cuallaidh]

I have a spreadsheet that looks like this:

UPC	Product	Qty	Price
123456789098	Product 1	10	9.99
098765432123	Product 2	2	7.00
456789098765	Product 3	1	1.99

What I need to do is create a new worksheet that has each row copied the number of times in the Qty column so Product 1 should be copied 10 times, product 2 twice and Product 3 just the once.

I have tried looking at other scripts on here for similar solutions, but cannot seem to get any of them to work right. I am using Exel v16 on Mac OS.

 

[JLGWhiz]

Sub t()
Dim i As Long
With ActiveSheet
    For i = .Cells(Rows.Count, 1).End(xlUp).Row To 2 Step -1
        Rows(i).Copy
        Rows(i).Offset(1).Resize(.Cells(i, "C").Value).EntireRow.Insert
    Next
End With
End Sub

 

[shaowu459]

Creat a helper column in A:A, enter formula in G2, drag to the right and down, until it returns "".

MrExcel.xlsx
	A	B	C	D	E	F	G	H	I	J
1	Helper	UPC	Product	Qty	Price		UPC	Product	Qty	Price
2	10	123456789098	Product 1	10	9.99		123456789098	Product 1	10	9.99
3	12	98765432123	Product 2	2	7		123456789098	Product 1	10	9.99
4	13	456789098765	Product 3	1	1.99		123456789098	Product 1	10	9.99
5							123456789098	Product 1	10	9.99
6							123456789098	Product 1	10	9.99
7							123456789098	Product 1	10	9.99
8							123456789098	Product 1	10	9.99
9							123456789098	Product 1	10	9.99
10							123456789098	Product 1	10	9.99
11							123456789098	Product 1	10	9.99
12							98765432123	Product 2	2	7.00
13							98765432123	Product 2	2	7.00
14							456789098765	Product 3	1	1.99
15
16
17
Sheet1

Cell Formulas
Range	Formula
G2:J17	G2	=IF(ROW(A1)>SUM($D:$D),"",IFERROR(VLOOKUP(ROW(A1),$A:$E,COLUMN(B1),),G3))
A2:A4	A2	=SUM(D$2:D2)