Дублирование строк по количеству символов 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

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

14   голосов , оценка 4.143 из 5