Dgerri
Дата: Четверг, 29.08.2019, 12:08 |
Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 65
Репутация:
0
±
Замечаний:
20% ±
Excel 2007
Доброе время суток уважаемые Гуру!!! Необходимо просуммировать в СВОД данные, которые есть на страницах, пока суммирую в ручную через (+), мозги пока ничего придумать не могут, прошу помощи... Заранее спасибо.
Доброе время суток уважаемые Гуру!!! Необходимо просуммировать в СВОД данные, которые есть на страницах, пока суммирую в ручную через (+), мозги пока ничего придумать не могут, прошу помощи... Заранее спасибо. Dgerri
Ответить
Сообщение Доброе время суток уважаемые Гуру!!! Необходимо просуммировать в СВОД данные, которые есть на страницах, пока суммирую в ручную через (+), мозги пока ничего придумать не могут, прошу помощи... Заранее спасибо. Автор - Dgerri Дата добавления - 29.08.2019 в 12:08
Nic70y
Дата: Четверг, 29.08.2019, 12:25 |
Сообщение № 2
Группа: Друзья
Ранг: Экселист
Сообщений: 8761
Репутация:
2273
±
Замечаний:
0% ±
Excel 2010
создаете лист (пустой) который всегда должен быть последним, в файле - End и соот. формулап.с. можно еще и "первый" лист добавить
создаете лист (пустой) который всегда должен быть последним, в файле - End и соот. формулап.с. можно еще и "первый" лист добавить Nic70y
ЮMoney 41001841029809
Ответить
Сообщение создаете лист (пустой) который всегда должен быть последним, в файле - End и соот. формулап.с. можно еще и "первый" лист добавить Автор - Nic70y Дата добавления - 29.08.2019 в 12:25
Dgerri
Дата: Четверг, 29.08.2019, 12:41 |
Сообщение № 3
Группа: Пользователи
Ранг: Участник
Сообщений: 65
Репутация:
0
±
Замечаний:
20% ±
Excel 2007
хороший вариант, счас попробую на рабочем файле пощелкать... спасибкин
хороший вариант, счас попробую на рабочем файле пощелкать... спасибкин Dgerri
Ответить
Сообщение хороший вариант, счас попробую на рабочем файле пощелкать... спасибкин Автор - Dgerri Дата добавления - 29.08.2019 в 12:41
Dgerri
Дата: Пятница, 30.08.2019, 01:34 |
Сообщение № 4
Группа: Пользователи
Ранг: Участник
Сообщений: 65
Репутация:
0
±
Замечаний:
20% ±
Excel 2007
поклацала - не получается подтягивать данные в СВОД, скорее всего это связано с тем, что сами ячейки на листах динамичные, т.е. не зафиксированы в одной строке... может как то через ПОИСК, что-то можно придумать? вот только я не знаю, как через ПОИСК можно суммировать листы.
поклацала - не получается подтягивать данные в СВОД, скорее всего это связано с тем, что сами ячейки на листах динамичные, т.е. не зафиксированы в одной строке... может как то через ПОИСК, что-то можно придумать? вот только я не знаю, как через ПОИСК можно суммировать листы. Dgerri
Ответить
Сообщение поклацала - не получается подтягивать данные в СВОД, скорее всего это связано с тем, что сами ячейки на листах динамичные, т.е. не зафиксированы в одной строке... может как то через ПОИСК, что-то можно придумать? вот только я не знаю, как через ПОИСК можно суммировать листы. Автор - Dgerri Дата добавления - 30.08.2019 в 01:34
Nic70y
Дата: Пятница, 30.08.2019, 08:59 |
Сообщение № 5
Группа: Друзья
Ранг: Экселист
Сообщений: 8761
Репутация:
2273
±
Замечаний:
0% ±
Excel 2010
ну конечно моя формула на это не рассчитана. приложите динамичный файл.
ну конечно моя формула на это не рассчитана. приложите динамичный файл. Nic70y
ЮMoney 41001841029809
Ответить
Сообщение ну конечно моя формула на это не рассчитана. приложите динамичный файл. Автор - Nic70y Дата добавления - 30.08.2019 в 08:59
Nic70y
Дата: Суббота, 31.08.2019, 10:46 |
Сообщение № 7
Группа: Друзья
Ранг: Экселист
Сообщений: 8761
Репутация:
2273
±
Замечаний:
0% ±
Excel 2010
сделал, как попало, с макрофункцией, с летучими, с допами, чет не думется
сделал, как попало, с макрофункцией, с летучими, с допами, чет не думется Nic70y
К сообщению приложен файл:
-2-.xlsm
(17.3 Kb)
ЮMoney 41001841029809
Ответить
Сообщение сделал, как попало, с макрофункцией, с летучими, с допами, чет не думется Автор - Nic70y Дата добавления - 31.08.2019 в 10:46
прохожий2019
Дата: Суббота, 31.08.2019, 11:07 |
Сообщение № 8
Группа: Проверенные
Ранг: Старожил
Сообщений: 1244
Репутация:
317
±
Замечаний:
0% ±
365 Beta Channel
PQ
[vba]
Код
let from = Excel.Workbook(File.Contents(Excel.CurrentWorkbook(){[Name="file"]}[Content]{0}[file])), selectR = Table.SelectRows(from, each ([Name] <> "Свод" and [Kind]="Sheet")), selectC = Table.SelectColumns(selectR,{"Data"}), list = {"День недели","Понедельник","Вторник","Среда","Четверг","Пятница"}, transf = Table.TransformColumns(selectC,{{"Data", each Table.PromoteHeaders(Table.SelectRows(_, each List.ContainsAny({[Column1]},list)))}}), list2 = List.Distinct(List.Combine(List.Transform(transf[Data], each Table.ColumnNames(_)))), expand = Table.ExpandTableColumn(transf, "Data", list2), unpiv = Table.UnpivotOtherColumns(expand, {"День недели"}, "Атрибут", "Значение"), piv = Table.Pivot(unpiv, List.Distinct(unpiv[Атрибут]), "Атрибут", "Значение", List.Sum), base = Excel.CurrentWorkbook(){[Name="база"]}[Content], join = Table.NestedJoin(base,"День недели", piv,"День недели", "temp"), to = Table.ExpandTableColumn(join, "temp", List.Skip(list2,1)) in to
[/vba]
PQ
[vba]
Код
let from = Excel.Workbook(File.Contents(Excel.CurrentWorkbook(){[Name="file"]}[Content]{0}[file])), selectR = Table.SelectRows(from, each ([Name] <> "Свод" and [Kind]="Sheet")), selectC = Table.SelectColumns(selectR,{"Data"}), list = {"День недели","Понедельник","Вторник","Среда","Четверг","Пятница"}, transf = Table.TransformColumns(selectC,{{"Data", each Table.PromoteHeaders(Table.SelectRows(_, each List.ContainsAny({[Column1]},list)))}}), list2 = List.Distinct(List.Combine(List.Transform(transf[Data], each Table.ColumnNames(_)))), expand = Table.ExpandTableColumn(transf, "Data", list2), unpiv = Table.UnpivotOtherColumns(expand, {"День недели"}, "Атрибут", "Значение"), piv = Table.Pivot(unpiv, List.Distinct(unpiv[Атрибут]), "Атрибут", "Значение", List.Sum), base = Excel.CurrentWorkbook(){[Name="база"]}[Content], join = Table.NestedJoin(base,"День недели", piv,"День недели", "temp"), to = Table.ExpandTableColumn(join, "temp", List.Skip(list2,1)) in to
[/vba]
прохожий2019
Сообщение отредактировал прохожий2019 - Суббота, 31.08.2019, 11:19
Ответить
Сообщение PQ
[vba]
Код
let from = Excel.Workbook(File.Contents(Excel.CurrentWorkbook(){[Name="file"]}[Content]{0}[file])), selectR = Table.SelectRows(from, each ([Name] <> "Свод" and [Kind]="Sheet")), selectC = Table.SelectColumns(selectR,{"Data"}), list = {"День недели","Понедельник","Вторник","Среда","Четверг","Пятница"}, transf = Table.TransformColumns(selectC,{{"Data", each Table.PromoteHeaders(Table.SelectRows(_, each List.ContainsAny({[Column1]},list)))}}), list2 = List.Distinct(List.Combine(List.Transform(transf[Data], each Table.ColumnNames(_)))), expand = Table.ExpandTableColumn(transf, "Data", list2), unpiv = Table.UnpivotOtherColumns(expand, {"День недели"}, "Атрибут", "Значение"), piv = Table.Pivot(unpiv, List.Distinct(unpiv[Атрибут]), "Атрибут", "Значение", List.Sum), base = Excel.CurrentWorkbook(){[Name="база"]}[Content], join = Table.NestedJoin(base,"День недели", piv,"День недели", "temp"), to = Table.ExpandTableColumn(join, "temp", List.Skip(list2,1)) in to
[/vba]
Автор - прохожий2019 Дата добавления - 31.08.2019 в 11:07
Dgerri
Дата: Воскресенье, 01.09.2019, 02:10 |
Сообщение № 9
Группа: Пользователи
Ранг: Участник
Сообщений: 65
Репутация:
0
±
Замечаний:
20% ±
Excel 2007
макросы точно тут не помощники, они у нас под запретом, IT отдел их боится
макросы точно тут не помощники, они у нас под запретом, IT отдел их боится Dgerri
Сообщение отредактировал Dgerri - Воскресенье, 01.09.2019, 02:14
Ответить
Сообщение макросы точно тут не помощники, они у нас под запретом, IT отдел их боится Автор - Dgerri Дата добавления - 01.09.2019 в 02:10
Pelena
Дата: Воскресенье, 01.09.2019, 07:47 |
Сообщение № 11
Группа: Админы
Ранг: Местный житель
Сообщений: 19184
Репутация:
4420
±
Замечаний:
±
Excel 365 & Mac Excel
Или, как вариант, сделать Консолидацию листов (Данные -- Консолидация), а потом уже формулой получить нужный результат
Или, как вариант, сделать Консолидацию листов (Данные -- Консолидация), а потом уже формулой получить нужный результат Pelena
"Черт возьми, Холмс! Но как??!!" Ю-money 41001765434816
Ответить
Сообщение Или, как вариант, сделать Консолидацию листов (Данные -- Консолидация), а потом уже формулой получить нужный результат Автор - Pelena Дата добавления - 01.09.2019 в 07:47
Dgerri
Дата: Воскресенье, 01.09.2019, 16:23 |
Сообщение № 12
Группа: Пользователи
Ранг: Участник
Сообщений: 65
Репутация:
0
±
Замечаний:
20% ±
Excel 2007
Данные вносятся каждый день, в каждый лист, в каждый день недели, каждый день делать консолидацию (а это еще один лист), а потом формулами подтягивать - не вижу смысла утяжелять файл, проще (+) просуммировать единожды и автоматом получать данные...создаете лист (пустой) который всегда должен быть последним, в файле - End и соот. формула =СУММ(А:End!B5)
наверное остановлюсь на этом варианте, провести коррекцию количество строк под спойлером проще. Спасибо всем за желание оказать помощь.
Данные вносятся каждый день, в каждый лист, в каждый день недели, каждый день делать консолидацию (а это еще один лист), а потом формулами подтягивать - не вижу смысла утяжелять файл, проще (+) просуммировать единожды и автоматом получать данные...создаете лист (пустой) который всегда должен быть последним, в файле - End и соот. формула =СУММ(А:End!B5)
наверное остановлюсь на этом варианте, провести коррекцию количество строк под спойлером проще. Спасибо всем за желание оказать помощь. Dgerri
Ответить
Сообщение Данные вносятся каждый день, в каждый лист, в каждый день недели, каждый день делать консолидацию (а это еще один лист), а потом формулами подтягивать - не вижу смысла утяжелять файл, проще (+) просуммировать единожды и автоматом получать данные...создаете лист (пустой) который всегда должен быть последним, в файле - End и соот. формула =СУММ(А:End!B5)
наверное остановлюсь на этом варианте, провести коррекцию количество строк под спойлером проще. Спасибо всем за желание оказать помощь. Автор - Dgerri Дата добавления - 01.09.2019 в 16:23
gling
Дата: Воскресенье, 01.09.2019, 23:04 |
Сообщение № 13
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2524
Репутация:
678
±
Замечаний:
0% ±
2010
Вариант формулами. Может кому сгодится.
Вариант формулами. Может кому сгодится. gling
ЯД-41001506838083
Сообщение отредактировал gling - Воскресенье, 01.09.2019, 23:05
Ответить
Сообщение Вариант формулами. Может кому сгодится. Автор - gling Дата добавления - 01.09.2019 в 23:04