Как скопировать ячейки из нескольких листов, которые еще не существуют, в основной лист?

Question

Я довольно неопытен в макросах, но у меня есть задача, которая, на мой взгляд, очень сложная и не может найти решение... Я уверен, что вы можете мне помочь. Вот проблема: у меня есть рабочая книга с 2 невидимыми листами ("сектор 1" и "отчет") и 1 скрытым ("основной").

"сектор 1" имеет командную кнопку, которая при нажатии вставляет новый лист с именем "сектор 2" (копия "основного"). Если я нажимаю командную кнопку в "секторе 2", она вставляет новую копию "основного" с именем "сектор 3" и так далее. Второй скрытый лист называется "отчет", и задача состоит в том, чтобы вставить столько строк в "отчет", сколько секторов в конечном итоге, и скопировать конкретные значения ячеек со всех скрытых листов, например, in cell *A8* of 'report' should be a copy of *B5* from 'sector 1'; in cell *B8* of 'report' should be a copy of *D46* from 'sector 1'; in cell *A9* of 'report' should be a copy of *B5* from 'sector 2'; in cell *B9* of 'report' should be a copy of *D46* from 'sector 2'.

Проблема в том, что эти листы - "сектор 2", "сектор 3", "сектор 4" и т. Д. Не должны существовать при открытии файла, и мне нужно иметь возможность вставлять неограниченное количество рабочих листов (соответственно секторов). Пожалуйста, помогите мне, я в тупике..

Answer 1

Введите эти формулы:

Лист: Отчет

Range A8: =INDIRECT("'Sector "&ROW(A8)-7&"'!B$5")
Range B8: =INDIRECT("'Sector "&ROW(A8)-7&"'!D$46")

Перетащите вниз, и он обновит ссылку на лист в каждой строке.