Замена данных со смещением

wertex Пользователь Сообщений: 8 Регистрация: 28.01.2016	#1 06.09.2018 16:04:32 Пример в приложенном файле. Нужно вместо значений в ячейках С3:С7 вставить значения из G3:G8, но при этом нужно, чтобы автоматически добавилась строка для значения G8. Прикрепленные файлы Пример.xlsx (8.7 КБ)

Пользователь

Сообщений: 3007 Регистрация: 18.07.2016

06.09.2018 19:36:28

Формулами не получилось

Код
Sub Вставить_() Dim lr As Long lr = Cells(Rows.Count, 7).End(xlUp).Row Range("C" & lr).Insert Shift:=xlDown Range("C3:C" & lr).Value = Range("G3:G" & lr).Value End Sub

Прикрепленные файлы

wertex Пользователь Сообщений: 8 Регистрация: 28.01.2016	#3 07.09.2018 07:04:34 У меня длинная портянка, в которую я должен вставлять данные из другой портянки. Скрипт тут не поможет (

Модератор

Сообщений: 23301 Регистрация: 28.12.2016

Excel 2013, 2016

07.09.2018 07:47:30

Цитата
wertex написал: Скрипт тут не поможет (

тогда вам ничто не поможет!
Так и надо было пример делать чуть более приближенный к реальности, не на одну, а на две, три итерации.

По вопросам из тем форума, личку не читаю.