Дублирование строк по количеству символов Excel - VBA

Формулировка задачи:

пример решение необходимо (укороч).xlsx Доброго времени суток. Необходимо: 1. Дублирование строк по значению в ячейке АМ, количество дублей зависит от количества символов (если написано 44,46,48 - то 3 строки, если 42 - только 1 дубль). 2. При этом в оригинальной строке значение в ячейке АМ должно пропасть. 3. В ячейке В в дублирующихся строках должно прописаться к основному названию значение из ячейки АМ (основная строка Платье Aira Style 304, в копирующихся Платье Aira Style 304 42, Платье Aira Style 304 46). Помогите понять как решить эту задачу, благодарю всех кто отпишется

Решение задачи: «Дублирование строк по количеству символов Excel»

textual
                            Листинг программы 
                        
 
                        
                          
                    
Sub vvv()
Application.ScreenUpdating = False
For i = Cells(Rows.Count, 39).End(xlUp).Row To 2 Step -1
  n = Split(Cells(i, "AM"), ",")
  Range("AM" & i + 1).Resize(UBound(n) + 1).EntireRow.Insert
  For Each s In n
    k = k + 1
    Cells(i + k, 2) = Cells(i, 2) & " " & n(k - 1)
  Next
  k = 0
Next
Application.ScreenUpdating = True
End Sub