[Gustav]

Цитата:

Сообщение от Gustav

видится такой извратный вариант - сдвигать все оставшиеся ячейки шаблона ниже места вставки вправо (как дверь шкафа-купе), потом делать копирование, потом возвращать "дверь" обратно. Стоит ли игра таких свеч?

Я имел в виду следующее - см. код VBA и рисунки:

Sub Macro1()
    Range("A6:C12").Insert xlShiftToRight 'xlShiftToRight = -4161
End Sub

Sub Macro2()
    Dim rng As Range
    Set rng = Range("B3")
    
    rng.Insert xlShiftDown 'xlShiftDown = -4121
    rng.Copy rng.Offset(-rng.Rows.Count)
End Sub

Sub Macro3()
    Range("A6:C12").Delete xlShiftToLeft 'xlShiftToLeft = -4159
End Sub

Теперь картинки. Исходное состояние. Далее будем размножать красную ячейку B3.


После отработки Macro1 - сдвинули "дверь" вправо:


После отработки Macro2 - выполнили размножение (объединенная голубая ячейка не мешает):


После отработки Macro3 - вернули "дверь" назад: