I had someone create the Macro below and now the source doc has 3 additional columns and I can't figure out how to edit it to account for them. It simply takes a list of products, in the first sheet of the work book and copies each unique row the number in the 9th column (I). The spreadsheet now has 3 additional columns so it will now be the 12th column (L).
Sub Label() Dim i As Long, j As Long, k As Long, m As Long
With Worksheets(1) i = InputBox("Enter the number of the column that contains the quantities.") For j = .Range("A1").CurrentRegion.Rows.Count To 2 Step -1 For k = 1 To .Range("a1").Offset(j - 1, i - 1).Value - 1 .Cells(j, 1).EntireRow.Insert For m = 1 To .Range("A1").CurrentRegion.Columns.Count .Cells(j, m).Value = .Cells(j + k, m).Value Next m Next k Next j End With End Sub