Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Автоматическое создание формул для нескольких листов - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Автоматическое создание формул для нескольких листов
Ignessio Дата: Воскресенье, 02.02.2025, 21:24 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 20
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
На листе "Площадки" в колонке № в колонке Площадки руками создается список площадок от 1 до неограниченного числа.
В книге уже есть макрос, который добавляет в книгу листы для каждой площадки из списка с таблицей из листа "Образец".
На листе ВСЕГО требуется автоматически создавать в ячейках формулы (заготовки в колонке I), складывающие значения соответствующих ячеек на каждом листе, создаваемом макросом.
К сообщению приложен файл: broker.xlsm (55.2 Kb)


a fool with a tool is still a fool.

Сообщение отредактировал Ignessio - Понедельник, 03.02.2025, 07:31
 
Ответить
СообщениеНа листе "Площадки" в колонке № в колонке Площадки руками создается список площадок от 1 до неограниченного числа.
В книге уже есть макрос, который добавляет в книгу листы для каждой площадки из списка с таблицей из листа "Образец".
На листе ВСЕГО требуется автоматически создавать в ячейках формулы (заготовки в колонке I), складывающие значения соответствующих ячеек на каждом листе, создаваемом макросом.

Автор - Ignessio
Дата добавления - 02.02.2025 в 21:24
gling Дата: Понедельник, 03.02.2025, 00:08 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2596
Репутация: 718 ±
Замечаний: 0% ±

2010
Вариант в файле с ДВССЫЛ() и формулой в диспетчере имен. Если на листе Площадки в столбце В будет список названий листов с которых надо собрать данные, они ссумируются. Имя листа и название в ячейке должно соответствовать 100%, ошибки текстов не допустимы. Формула массивная.
Код
=СУММ(ЕСЛИОШИБКА(СУММЕСЛИ(ДВССЫЛ("'"&Площ&"'!"&ЯЧЕЙКА("адрес";C3));">0");))
Не знаю как макрос добавляет листы, его нет в файле, но если новый лист вставлять 3 с конца, перед листом "Образец", то не нужна эта формула массива и всё остальное. Суммировать можно простой формулой
Код
=СУММ('Площадка 1:Образец'!C3)
В файле выделил цветом, вне таблицы. При вставке листов между Площадка 1 и Образец, значения этих листов будут попадать в общую сумму.
К сообщению приложен файл: 6168821.xlsx (68.2 Kb)


ЯД-41001506838083

Сообщение отредактировал gling - Понедельник, 03.02.2025, 00:19
 
Ответить
СообщениеВариант в файле с ДВССЫЛ() и формулой в диспетчере имен. Если на листе Площадки в столбце В будет список названий листов с которых надо собрать данные, они ссумируются. Имя листа и название в ячейке должно соответствовать 100%, ошибки текстов не допустимы. Формула массивная.
Код
=СУММ(ЕСЛИОШИБКА(СУММЕСЛИ(ДВССЫЛ("'"&Площ&"'!"&ЯЧЕЙКА("адрес";C3));">0");))
Не знаю как макрос добавляет листы, его нет в файле, но если новый лист вставлять 3 с конца, перед листом "Образец", то не нужна эта формула массива и всё остальное. Суммировать можно простой формулой
Код
=СУММ('Площадка 1:Образец'!C3)
В файле выделил цветом, вне таблицы. При вставке листов между Площадка 1 и Образец, значения этих листов будут попадать в общую сумму.

Автор - gling
Дата добавления - 03.02.2025 в 00:08
Ignessio Дата: Понедельник, 03.02.2025, 07:33 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 20
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
gling, спасибо за быстрый ответ!
Только изначально листов нет и формулы из-за битых ссылок на несуществующие листы ломаются.
Перезалил файл с макросом.


a fool with a tool is still a fool.

Сообщение отредактировал Ignessio - Понедельник, 03.02.2025, 08:07
 
Ответить
Сообщениеgling, спасибо за быстрый ответ!
Только изначально листов нет и формулы из-за битых ссылок на несуществующие листы ломаются.
Перезалил файл с макросом.

Автор - Ignessio
Дата добавления - 03.02.2025 в 07:33
_Boroda_ Дата: Понедельник, 03.02.2025, 09:46 | Сообщение № 4
Группа: Админы
Ранг: Местный житель
Сообщений: 16807
Репутация: 6560 ±
Замечаний: ±

2003; 2007; 2010; 2013 RUS
Добавьте в макрос, создающий листы, строки типа
[vba]
Код
Sheets("ВСЕГО").Range("C3:H6").FormulaR1C1 = "=SUM('Площадка*'!RC)"
[/vba]


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеДобавьте в макрос, создающий листы, строки типа
[vba]
Код
Sheets("ВСЕГО").Range("C3:H6").FormulaR1C1 = "=SUM('Площадка*'!RC)"
[/vba]

Автор - _Boroda_
Дата добавления - 03.02.2025 в 09:46
Ignessio Дата: Понедельник, 03.02.2025, 10:24 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 20
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
_Boroda_, спасибо!
Не уверен, что правильно вставил строку. Сейчас создаются формулы во всем заданном диапазоне, а нужно только в определенных ячейках.
Наверное, я недостаточно развернуто пояснил задачу.
1. Макрос создает листы с именами, задаваемыми в листе Площадки колонка В
2. На каждом листе Площадка 1, Площадка 2 и т.д. в блоках колонок Количество и Выбор задается цифровое значение и отмечается тикбокс.
3. На листе ВСЕГО суммируются значения со всех листов Площадка 1, Площадка 2 и т.д.
4. В строках 7.1, 7.2, 7,3 суммируются отмеченные тикбоксы с листов Площадка 1, Площадка 2 и т.д.
5. В ячейку ДОПОЛНИТЕЛЬНЫЕ ТРЕБОВАНИЯ складывается текст из соответствующих ячеек листов Площадка 1, Площадка 2 и т.д.
Чтобы стало понятней, закрасил в файле серым фиксированные данные, заполняются только ячейки без заливки. Лист Основное не участвует.
Обновленный файл приложил.

UPD: С диапазоном разобрался. Также хочется, чтобы если сумма = 0, то ячейка оставалась пустой, как сделано у меня в заготовках.
К сообщению приложен файл: broker3.xlsm (51.5 Kb)


a fool with a tool is still a fool.

Сообщение отредактировал Ignessio - Понедельник, 03.02.2025, 11:06
 
Ответить
Сообщение_Boroda_, спасибо!
Не уверен, что правильно вставил строку. Сейчас создаются формулы во всем заданном диапазоне, а нужно только в определенных ячейках.
Наверное, я недостаточно развернуто пояснил задачу.
1. Макрос создает листы с именами, задаваемыми в листе Площадки колонка В
2. На каждом листе Площадка 1, Площадка 2 и т.д. в блоках колонок Количество и Выбор задается цифровое значение и отмечается тикбокс.
3. На листе ВСЕГО суммируются значения со всех листов Площадка 1, Площадка 2 и т.д.
4. В строках 7.1, 7.2, 7,3 суммируются отмеченные тикбоксы с листов Площадка 1, Площадка 2 и т.д.
5. В ячейку ДОПОЛНИТЕЛЬНЫЕ ТРЕБОВАНИЯ складывается текст из соответствующих ячеек листов Площадка 1, Площадка 2 и т.д.
Чтобы стало понятней, закрасил в файле серым фиксированные данные, заполняются только ячейки без заливки. Лист Основное не участвует.
Обновленный файл приложил.

UPD: С диапазоном разобрался. Также хочется, чтобы если сумма = 0, то ячейка оставалась пустой, как сделано у меня в заготовках.

Автор - Ignessio
Дата добавления - 03.02.2025 в 10:24
_Boroda_ Дата: Понедельник, 03.02.2025, 11:18 | Сообщение № 6
Группа: Админы
Ранг: Местный житель
Сообщений: 16807
Репутация: 6560 ±
Замечаний: ±

2003; 2007; 2010; 2013 RUS
К сожалению, я с работы не могу скачать файл с макросами, поэтому попытаюсь ответить так, не видя файла.
Диапазоны Вы можете указать в куске Range("C3:H6"). Серые ячейки (я скачал файл от gling из сообщения #2) тоже можно заполнять формулами, там же все равно будет 0. А скрывать нули можно форматом ячеек, вот таким, например:
0;;
или
0,00;-0,00;


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеК сожалению, я с работы не могу скачать файл с макросами, поэтому попытаюсь ответить так, не видя файла.
Диапазоны Вы можете указать в куске Range("C3:H6"). Серые ячейки (я скачал файл от gling из сообщения #2) тоже можно заполнять формулами, там же все равно будет 0. А скрывать нули можно форматом ячеек, вот таким, например:
0;;
или
0,00;-0,00;

Автор - _Boroda_
Дата добавления - 03.02.2025 в 11:18
Ignessio Дата: Понедельник, 03.02.2025, 11:57 | Сообщение № 7
Группа: Пользователи
Ранг: Новичок
Сообщений: 20
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Макрос выглядит таким образом:

Остался вопрос как посчитать тикбоксы?


a fool with a tool is still a fool.

Сообщение отредактировал Ignessio - Понедельник, 03.02.2025, 16:22
 
Ответить
СообщениеМакрос выглядит таким образом:

Остался вопрос как посчитать тикбоксы?

Автор - Ignessio
Дата добавления - 03.02.2025 в 11:57
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2025 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!