Код для этого довольно прост (всего пара циклов Do ... To), но лучший способ получить решение для этого - использовать функцию записи макросов в Excel.
Если вы будете использовать VBA в будущем, и это ваш первый вход в него, нет лучшего способа изучить основы, чем нажать кнопку «Запись макроса», вручную выполнить некоторые шаги в электронной таблице и затем посмотрите на код, который сгенерировал Excel.
Вы сможете увидеть шаги, необходимые для выполнения необходимых операций. Единственное, что вам нужно будет сделать, это обернуть эти шаги в цикл и выполнить логическую проверку (If..Then), чтобы проверить строки в ячейках, а также отслеживать количество строк, которые были пропущено перед тем, как встретить следующую строку (для использования в операторе вставки).