Добрый день, дамы и господа Прошу содействия в решении вопроса суммирования данных из ячеек L16 во всей книге, т.е. нужно просуммировать данные с листов 01, 02, 03 и 04, которые расположены в ячейках L16 на каждом из листов. Количество листов меняется. Нашел вот эту формулу
Код
=СУММ('01:04'!L16)
однако имя последнего листа нужно постоянно актуализировать (в данном примере это 04).
Я пробовал решить через макрос вывода всех наименований листов в столбец, далее отсортировал бы по убыванию и получил бы в первой ячейке наименование нужного листа, однако не смог данные из ячейки в вышеприведенную формулу включить за один подход,
Добрый день, дамы и господа Прошу содействия в решении вопроса суммирования данных из ячеек L16 во всей книге, т.е. нужно просуммировать данные с листов 01, 02, 03 и 04, которые расположены в ячейках L16 на каждом из листов. Количество листов меняется. Нашел вот эту формулу
Код
=СУММ('01:04'!L16)
однако имя последнего листа нужно постоянно актуализировать (в данном примере это 04).
Я пробовал решить через макрос вывода всех наименований листов в столбец, далее отсортировал бы по убыванию и получил бы в первой ячейке наименование нужного листа, однако не смог данные из ячейки в вышеприведенную формулу включить за один подход,
имя последнего листа нужно постоянно актуализировать
предлагаю такой нехитрый приём: сделайте пустой лист в конце книги, назовите его, к примеру, "крайний", а новые листы добавляйте ПЕРЕД ним, тогда формула будет актуальной и не потребует корректировки
имя последнего листа нужно постоянно актуализировать
предлагаю такой нехитрый приём: сделайте пустой лист в конце книги, назовите его, к примеру, "крайний", а новые листы добавляйте ПЕРЕД ним, тогда формула будет актуальной и не потребует корректировки
От себя добавлю: Лист "крайний" можно поместить в конце книги (справа) и скрыть В таком случае он не только не будет мешать, но и все вставляемые в книгу листы будут вставляться перед ним, т.е. попадать в 3D-формулу
От себя добавлю: Лист "крайний" можно поместить в конце книги (справа) и скрыть В таком случае он не только не будет мешать, но и все вставляемые в книгу листы будут вставляться перед ним, т.е. попадать в 3D-формулуSerge_007
Спасибо большое всем. Интересные решения с крайним листом. Так же заметал, что если удаляю крайние листы, то формула автоматически определяет последний лист (т.е. удаляю 03 и 04, а в формуле уже стоит 02), жаль в обратную сторону не работает).
Спасибо большое всем. Интересные решения с крайним листом. Так же заметал, что если удаляю крайние листы, то формула автоматически определяет последний лист (т.е. удаляю 03 и 04, а в формуле уже стоит 02), жаль в обратную сторону не работает).timo64uk
Сообщение отредактировал timo64uk - Понедельник, 25.10.2021, 15:44
Не могу понять почему не суммирует данные ячейки L16 из листов 02, 03 и 04 Выводит в L1 только значение L16 из 01 листа. А в приложенном вашем файле все прекрасно считает. Спасибо ******* Ура, заработало. Whis на Active заменил, чтоб с внешнего файла запускать. [vba]
Код
Sub TTT() R = ActiveWorkbook.Sheets.Count
For I_ = 1 To R Ya_ = Sheets(I_).Range("L16").Value SsU_ = SsU_ + Ya_ Next Sheets(1).Range("L1").Value = SsU_ End Sub
Не могу понять почему не суммирует данные ячейки L16 из листов 02, 03 и 04 Выводит в L1 только значение L16 из 01 листа. А в приложенном вашем файле все прекрасно считает. Спасибо ******* Ура, заработало. Whis на Active заменил, чтоб с внешнего файла запускать. [vba]
Код
Sub TTT() R = ActiveWorkbook.Sheets.Count
For I_ = 1 To R Ya_ = Sheets(I_).Range("L16").Value SsU_ = SsU_ + Ya_ Next Sheets(1).Range("L1").Value = SsU_ End Sub