1

У меня есть некоторые данные, которые сводятся или суммируются, что мне нужно "развернуть". Данные выглядят так:

1000000 6
1245142 4
1245246 6

Мне нужно, чтобы это выглядело так (каждое значение в первом столбце печатается столько раз, сколько диктует значение во втором столбце):

1000000
1000000
1000000
1000000
1000000
1000000
1245142
1245142
1245142
1245142
1245246
1245246
1245246
1245246
1245246
1245246

и т.п.

Есть ли простой способ сделать это в Excel?

1 ответ1

1

Некоторым VBA это нравится, просто настройте по мере необходимости.

Он ищет в определенном диапазоне числа, проверяет рядом с ними положительные целые числа и затем печатает их в другом столбце на основе соседней ячейки.

Sub test()
Dim i As Integer
Dim x As Integer
Dim c As Range
Dim d As Integer
d = 1

For Each c In Range("A1:A3")
i = c.Offset(, 1).Value

  If i > 0 Then

    For x = 1 To i
    Cells(d, 4) = c.Value
    d = d + 1
    Next x

  End If

Next c

End Sub

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .