Поиск данных по добавляющимся листам и динамическим диапазоном

@OksanaDan · Регистрация: 25.01.2019

Author24 — интернет-сервис помощи студентам

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

Мне нужно сделать простенькую формулу ('Отчет'С4='1'!С8)
Сложность в том, что данные в листах будут с динамическими диапазоном, поэтому просто формулой (='1'!С8) не возможно это сделать.
Пытаюсь сделать макросом. Для определения диапазона, с которого нужно взять данные я поставила маркер под цифрой 4. Далее необходимо прописать формулу.

Таким образом нахожу ячейку с нужными мне данными на листе 1

Visual Basic

Sub Отчет()
'Нахожу блок с данными для отчета в нужном листе
Sheets("1").Select
Rows("2").Find("4", , xlValues, xlWhole).Select
 
'Смещение до ячейки со значениями
ActiveCell.Offset(6, 1).Select
 
 End Sub

Подскажите пожалуйста, как можно сделать так, чтобы прописалась нужная мне формула.
И как можно сделать так, чтобы при добавлении листа данные тоже собирались в таблицу в необходимый месяц.

Вероятно очень сумбурно описала проблему.
Покажу в примере.

@Narimanych · 29.01.2019, 09:41

OksanaDan,

Приложите реальную книгу с 2-мя или 3-мя листами. Легче будет понять и сделать то что нужно....
А так

@Narimanych 2724 / 1701 / 776 Регистрация: 23.03.2015 Сообщений: 5,388
	29.01.2019, 09:41	2
	OksanaDan, Приложите реальную книгу с 2-мя или 3-мя листами. Легче будет понять и сделать то что нужно.... А так 0