Свести данные в одну таблицу
alex24
Дата: Пятница, 15.09.2023, 01:39 |
Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 7
Репутация:
0
±
Замечаний:
20% ±
2021
Всех приветствую. Уже обращался к Вам, мой вопрос очень оперативно решили. Но есть еще один вопрос. Имею несколько таблиц, которые по формулах считают данные (второе значение в таблице). Нужно составить сводную таблицу, которая отобразит наименование с значениями, в алфавитном порядке, без пропусков. Тоесть, наименования, в которых нет второго значения выводить не нужно. Пример предоставляю в виде скрина и книги.
Всех приветствую. Уже обращался к Вам, мой вопрос очень оперативно решили. Но есть еще один вопрос. Имею несколько таблиц, которые по формулах считают данные (второе значение в таблице). Нужно составить сводную таблицу, которая отобразит наименование с значениями, в алфавитном порядке, без пропусков. Тоесть, наименования, в которых нет второго значения выводить не нужно. Пример предоставляю в виде скрина и книги. alex24
Ответить
Сообщение Всех приветствую. Уже обращался к Вам, мой вопрос очень оперативно решили. Но есть еще один вопрос. Имею несколько таблиц, которые по формулах считают данные (второе значение в таблице). Нужно составить сводную таблицу, которая отобразит наименование с значениями, в алфавитном порядке, без пропусков. Тоесть, наименования, в которых нет второго значения выводить не нужно. Пример предоставляю в виде скрина и книги. Автор - alex24 Дата добавления - 15.09.2023 в 01:39
прохожий2019
Дата: Пятница, 15.09.2023, 06:49 |
Сообщение № 2
Группа: Проверенные
Ранг: Старожил
Сообщений: 1282
Репутация:
322
±
Замечаний:
0% ±
365 Beta Channel
[vba]Код
=LET(x;ВСТОЛБИК(B3:C24;E3:F24);СОРТ(ФИЛЬТР(x;ИНДЕКС(x;;2))))
[/vba]
[vba]Код
=LET(x;ВСТОЛБИК(B3:C24;E3:F24);СОРТ(ФИЛЬТР(x;ИНДЕКС(x;;2))))
[/vba] прохожий2019
Ответить
Сообщение [vba]Код
=LET(x;ВСТОЛБИК(B3:C24;E3:F24);СОРТ(ФИЛЬТР(x;ИНДЕКС(x;;2))))
[/vba] Автор - прохожий2019 Дата добавления - 15.09.2023 в 06:49
китин
Дата: Пятница, 15.09.2023, 09:44 |
Сообщение № 3
Группа: Модераторы
Ранг: Экселист
Сообщений: 7024
Репутация:
1075
±
Замечаний:
0% ±
Excel 2007;2010;2016
PQ всемогущий
Не судите очень строго:я пытаюсь научиться ЯД 41001877306852
Ответить
Сообщение PQ всемогущий Автор - китин Дата добавления - 15.09.2023 в 09:44
Светлый
Дата: Пятница, 15.09.2023, 09:45 |
Сообщение № 4
Группа: Друзья
Ранг: Старожил
Сообщений: 1841
Репутация:
521
±
Замечаний:
0% ±
Excel 2013, 2016
Если не последними офисами, но без сортировки. Формула массива для названия:Код
=ЕСЛИОШИБКА(ИНДЕКС(Т(СМЕЩ(B$3;ОСТАТ(СТРОКА(A$1:A$99)-1;50);(ОТБР(СТРОКА(A$1:A$99)-1)/50)*3));НАИМЕНЬШИЙ(ЕСЛИ(ИНДЕКС(Ч(СМЕЩ(C$3;ОСТАТ(СТРОКА(A$1:A$99)-1;50);(ОТБР(СТРОКА(A$1:A$99)-1)/50)*3));)>0;СТРОКА(A$1:A$99));СТРОКА(I1)));"")
и для значения:Код
=ЕСЛИОШИБКА(ИНДЕКС(Ч(СМЕЩ(C$3;ОСТАТ(СТРОКА(A$1:A$99)-1;50);(ОТБР(СТРОКА(A$1:A$99)-1)/50)*3));НАИМЕНЬШИЙ(ЕСЛИ(ИНДЕКС(Ч(СМЕЩ(C$3;ОСТАТ(СТРОКА(A$1:A$99)-1;50);(ОТБР(СТРОКА(A$1:A$99)-1)/50)*3));)>0;СТРОКА(A$1:A$99));СТРОКА(I1)));"")
Если не последними офисами, но без сортировки. Формула массива для названия:Код
=ЕСЛИОШИБКА(ИНДЕКС(Т(СМЕЩ(B$3;ОСТАТ(СТРОКА(A$1:A$99)-1;50);(ОТБР(СТРОКА(A$1:A$99)-1)/50)*3));НАИМЕНЬШИЙ(ЕСЛИ(ИНДЕКС(Ч(СМЕЩ(C$3;ОСТАТ(СТРОКА(A$1:A$99)-1;50);(ОТБР(СТРОКА(A$1:A$99)-1)/50)*3));)>0;СТРОКА(A$1:A$99));СТРОКА(I1)));"")
и для значения:Код
=ЕСЛИОШИБКА(ИНДЕКС(Ч(СМЕЩ(C$3;ОСТАТ(СТРОКА(A$1:A$99)-1;50);(ОТБР(СТРОКА(A$1:A$99)-1)/50)*3));НАИМЕНЬШИЙ(ЕСЛИ(ИНДЕКС(Ч(СМЕЩ(C$3;ОСТАТ(СТРОКА(A$1:A$99)-1;50);(ОТБР(СТРОКА(A$1:A$99)-1)/50)*3));)>0;СТРОКА(A$1:A$99));СТРОКА(I1)));"")
Светлый
Программировать проще, чем писать стихи.
Ответить
Сообщение Если не последними офисами, но без сортировки. Формула массива для названия:Код
=ЕСЛИОШИБКА(ИНДЕКС(Т(СМЕЩ(B$3;ОСТАТ(СТРОКА(A$1:A$99)-1;50);(ОТБР(СТРОКА(A$1:A$99)-1)/50)*3));НАИМЕНЬШИЙ(ЕСЛИ(ИНДЕКС(Ч(СМЕЩ(C$3;ОСТАТ(СТРОКА(A$1:A$99)-1;50);(ОТБР(СТРОКА(A$1:A$99)-1)/50)*3));)>0;СТРОКА(A$1:A$99));СТРОКА(I1)));"")
и для значения:Код
=ЕСЛИОШИБКА(ИНДЕКС(Ч(СМЕЩ(C$3;ОСТАТ(СТРОКА(A$1:A$99)-1;50);(ОТБР(СТРОКА(A$1:A$99)-1)/50)*3));НАИМЕНЬШИЙ(ЕСЛИ(ИНДЕКС(Ч(СМЕЩ(C$3;ОСТАТ(СТРОКА(A$1:A$99)-1;50);(ОТБР(СТРОКА(A$1:A$99)-1)/50)*3));)>0;СТРОКА(A$1:A$99));СТРОКА(I1)));"")
Автор - Светлый Дата добавления - 15.09.2023 в 09:45
alex24
Дата: Суббота, 16.09.2023, 11:02 |
Сообщение № 5
Группа: Пользователи
Ранг: Прохожий
Сообщений: 7
Репутация:
0
±
Замечаний:
20% ±
2021
А можно сделать так, что бы при смене данных в таблице №1 или №2, менялся результат согласно требований в итоговой таблице?
А можно сделать так, что бы при смене данных в таблице №1 или №2, менялся результат согласно требований в итоговой таблице? alex24
Ответить
Сообщение А можно сделать так, что бы при смене данных в таблице №1 или №2, менялся результат согласно требований в итоговой таблице? Автор - alex24 Дата добавления - 16.09.2023 в 11:02
Egyptian
Дата: Суббота, 16.09.2023, 11:42 |
Сообщение № 6
Группа: Проверенные
Ранг: Ветеран
Сообщений: 516
Репутация:
187
±
Замечаний:
0% ±
Excel 2013/2016
Еще формульный вариант, без сортировки. Есть возможность оптимизации. ТекстКод
INDIRECT(TEXT(MOD(SMALL(IFNA(IF(ISTEXT($B$3:$E$24)*ISNUMBER($C$3:$F$24);ROW($B$3:$F$24)*1000+COLUMN($B$3:$F$24)*1000001;99999999);99999999);ROW(A1));1000000);"R0C000");)
ЗначенияКод
=INDIRECT(TEXT(MOD(SMALL(IFNA(IF(ISNUMBER($B$3:$F$24);ROW($B$3:$F$24)*1000+COLUMN($B$3:$F$24)*1000001;99999999);99999999);ROW(A1));1000000);"R0C000");)
Еще формульный вариант, без сортировки. Есть возможность оптимизации. ТекстКод
INDIRECT(TEXT(MOD(SMALL(IFNA(IF(ISTEXT($B$3:$E$24)*ISNUMBER($C$3:$F$24);ROW($B$3:$F$24)*1000+COLUMN($B$3:$F$24)*1000001;99999999);99999999);ROW(A1));1000000);"R0C000");)
ЗначенияКод
=INDIRECT(TEXT(MOD(SMALL(IFNA(IF(ISNUMBER($B$3:$F$24);ROW($B$3:$F$24)*1000+COLUMN($B$3:$F$24)*1000001;99999999);99999999);ROW(A1));1000000);"R0C000");)
Egyptian
Ответить
Сообщение Еще формульный вариант, без сортировки. Есть возможность оптимизации. ТекстКод
INDIRECT(TEXT(MOD(SMALL(IFNA(IF(ISTEXT($B$3:$E$24)*ISNUMBER($C$3:$F$24);ROW($B$3:$F$24)*1000+COLUMN($B$3:$F$24)*1000001;99999999);99999999);ROW(A1));1000000);"R0C000");)
ЗначенияКод
=INDIRECT(TEXT(MOD(SMALL(IFNA(IF(ISNUMBER($B$3:$F$24);ROW($B$3:$F$24)*1000+COLUMN($B$3:$F$24)*1000001;99999999);99999999);ROW(A1));1000000);"R0C000");)
Автор - Egyptian Дата добавления - 16.09.2023 в 11:42
jakim
Дата: Суббота, 16.09.2023, 15:37 |
Сообщение № 7
Группа: Друзья
Ранг: Старожил
Сообщений: 1210
Репутация:
314
±
Замечаний:
0% ±
Excel 2010
Power Query
l[vba]Код
et Source = Excel.CurrentWorkbook(){[Name="Table2"]}[Content], #"Renamed Columns" = Table.RenameColumns(Source,{{"ТАБЛИЦА 2", "ТАБЛИЦА"}}), #"Appended Query" = Table.Combine({#"Renamed Columns", Table1}), #"Filtered Rows" = Table.SelectRows(#"Appended Query", each ([Column1] <> null)), #"Sorted Rows" = Table.Sort(#"Filtered Rows",{{"ТАБЛИЦА", Order.Ascending}}) in #"Sorted Rows"
[/vba]
Power Query
l[vba]Код
et Source = Excel.CurrentWorkbook(){[Name="Table2"]}[Content], #"Renamed Columns" = Table.RenameColumns(Source,{{"ТАБЛИЦА 2", "ТАБЛИЦА"}}), #"Appended Query" = Table.Combine({#"Renamed Columns", Table1}), #"Filtered Rows" = Table.SelectRows(#"Appended Query", each ([Column1] <> null)), #"Sorted Rows" = Table.Sort(#"Filtered Rows",{{"ТАБЛИЦА", Order.Ascending}}) in #"Sorted Rows"
[/vba]jakim
Ответить
Сообщение Power Query
l[vba]Код
et Source = Excel.CurrentWorkbook(){[Name="Table2"]}[Content], #"Renamed Columns" = Table.RenameColumns(Source,{{"ТАБЛИЦА 2", "ТАБЛИЦА"}}), #"Appended Query" = Table.Combine({#"Renamed Columns", Table1}), #"Filtered Rows" = Table.SelectRows(#"Appended Query", each ([Column1] <> null)), #"Sorted Rows" = Table.Sort(#"Filtered Rows",{{"ТАБЛИЦА", Order.Ascending}}) in #"Sorted Rows"
[/vba]Автор - jakim Дата добавления - 16.09.2023 в 15:37