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

Вход

Регистрация

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

 

= Мир MS Excel/Из сводной таблицы в плоскую - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Из сводной таблицы в плоскую
stas8892 Дата: Четверг, 19.10.2023, 12:43 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 25
Репутация: 0 ±
Замечаний: 20% ±

Microsoft Office Standart 2019
Доброго времени суток!
Подскажите пожалуйста как осуществить в Exel с помощью формул преобразование одной таблицы в другую, как в приложенном примере.
К сообщению приложен файл: 1685402.xlsx (8.8 Kb)
 
Ответить
СообщениеДоброго времени суток!
Подскажите пожалуйста как осуществить в Exel с помощью формул преобразование одной таблицы в другую, как в приложенном примере.

Автор - stas8892
Дата добавления - 19.10.2023 в 12:43
Nic70y Дата: Четверг, 19.10.2023, 13:02 | Сообщение № 2
Группа: Друзья
Ранг: Экселист
Сообщений: 9005
Репутация: 2369 ±
Замечаний: 0% ±

Excel 2010
см. файл
К сообщению приложен файл: 7230.xlsx (9.5 Kb)


ЮMoney 41001841029809
 
Ответить
Сообщениесм. файл

Автор - Nic70y
Дата добавления - 19.10.2023 в 13:02
cmivadwot Дата: Четверг, 19.10.2023, 13:05 | Сообщение № 3
Группа: Проверенные
Ранг: Ветеран
Сообщений: 534
Репутация: 97 ±
Замечаний: 0% ±

365
stas8892, оу.. а из чего куда?
К сообщению приложен файл: 5529186.xlsx (10.5 Kb)


Сообщение отредактировал cmivadwot - Четверг, 19.10.2023, 13:09
 
Ответить
Сообщениеstas8892, оу.. а из чего куда?

Автор - cmivadwot
Дата добавления - 19.10.2023 в 13:05
jakim Дата: Четверг, 19.10.2023, 15:36 | Сообщение № 4
Группа: Друзья
Ранг: Старожил
Сообщений: 1216
Репутация: 316 ±
Замечаний: 0% ±

Excel 2010
Смотрите приложение
К сообщению приложен файл: 6795590.xlsx (9.6 Kb)
 
Ответить
Сообщение
Смотрите приложение

Автор - jakim
Дата добавления - 19.10.2023 в 15:36
jakim Дата: Четверг, 19.10.2023, 15:46 | Сообщение № 5
Группа: Друзья
Ранг: Старожил
Сообщений: 1216
Репутация: 316 ±
Замечаний: 0% ±

Excel 2010
Power Query

[vba]
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Changed Type" = Table.TransformColumnTypes(Source,{{"Column1", type text}, {"зеленый", Int64.Type}, {"красный", Int64.Type}, {"желтый", Int64.Type}, {"черный", Int64.Type}, {"оранжевый", Int64.Type}, {"фиолетовый", Int64.Type}}),
    #"Unpivoted Other Columns" = Table.UnpivotOtherColumns(#"Changed Type", {"Column1"}, "Attribute", "Value")
in
    #"Unpivoted Other Columns"
[/vba]
К сообщению приложен файл: 1685402_1.xlsx (17.3 Kb)
 
Ответить
Сообщение
Power Query

[vba]
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Changed Type" = Table.TransformColumnTypes(Source,{{"Column1", type text}, {"зеленый", Int64.Type}, {"красный", Int64.Type}, {"желтый", Int64.Type}, {"черный", Int64.Type}, {"оранжевый", Int64.Type}, {"фиолетовый", Int64.Type}}),
    #"Unpivoted Other Columns" = Table.UnpivotOtherColumns(#"Changed Type", {"Column1"}, "Attribute", "Value")
in
    #"Unpivoted Other Columns"
[/vba]

Автор - jakim
Дата добавления - 19.10.2023 в 15:46
jakim Дата: Пятница, 20.10.2023, 18:16 | Сообщение № 6
Группа: Друзья
Ранг: Старожил
Сообщений: 1216
Репутация: 316 ±
Замечаний: 0% ±

Excel 2010
Вам просто надо было увеличить диапазон вычислений.
К сообщению приложен файл: 7725334.xlsx (10.5 Kb)
 
Ответить
СообщениеВам просто надо было увеличить диапазон вычислений.

Автор - jakim
Дата добавления - 20.10.2023 в 18:16
Gustav Дата: Пятница, 20.10.2023, 23:53 | Сообщение № 7
Группа: Админы
Ранг: Участник клуба
Сообщений: 2797
Репутация: 1161 ±
Замечаний: ±

начинал с Excel 4.0, видел 2.1
Очередная хорошая возможность поупражняться в использовании новых функций. Для версий Excel 365/2021+ формула для ячейки A7:
[vba]
Код
=LET(
еда;  A2:A4;
цвет; B1:G1;
поле; B2:G4;

n;    СЧЁТЗ(еда);
m;    СЧЁТЗ(цвет);
ii;   ПОСТОЛБЦ(MAKEARRAY(n; m; LAMBDA(стр;кол; стр)));
jj;   ПОСТОЛБЦ(MAKEARRAY(n; m; LAMBDA(стр;кол; кол)));
усл;  ИНДЕКС(поле;ii;jj) > 0;
i;    ФИЛЬТР(ii;усл);
j;    ФИЛЬТР(jj;усл);

ГСТОЛБИК(MAP(i;  LAMBDA(r;  ИНДЕКС(еда; r  )));
         MAP(j;  LAMBDA(c;  ИНДЕКС(цвет;c  )));
         MAP(i;j;LAMBDA(r;c;ИНДЕКС(поле;r;c))))
)
[/vba]


МОИ: Ник, Tip box: 41001663842605
 
Ответить
СообщениеОчередная хорошая возможность поупражняться в использовании новых функций. Для версий Excel 365/2021+ формула для ячейки A7:
[vba]
Код
=LET(
еда;  A2:A4;
цвет; B1:G1;
поле; B2:G4;

n;    СЧЁТЗ(еда);
m;    СЧЁТЗ(цвет);
ii;   ПОСТОЛБЦ(MAKEARRAY(n; m; LAMBDA(стр;кол; стр)));
jj;   ПОСТОЛБЦ(MAKEARRAY(n; m; LAMBDA(стр;кол; кол)));
усл;  ИНДЕКС(поле;ii;jj) > 0;
i;    ФИЛЬТР(ii;усл);
j;    ФИЛЬТР(jj;усл);

ГСТОЛБИК(MAP(i;  LAMBDA(r;  ИНДЕКС(еда; r  )));
         MAP(j;  LAMBDA(c;  ИНДЕКС(цвет;c  )));
         MAP(i;j;LAMBDA(r;c;ИНДЕКС(поле;r;c))))
)
[/vba]

Автор - Gustav
Дата добавления - 20.10.2023 в 23:53
stas8892 Дата: Понедельник, 23.10.2023, 06:35 | Сообщение № 8
Группа: Пользователи
Ранг: Новичок
Сообщений: 25
Репутация: 0 ±
Замечаний: 20% ±

Microsoft Office Standart 2019
Премного благодарен всем! Формулы работают! репутацию поднял каждому


Сообщение отредактировал stas8892 - Понедельник, 23.10.2023, 06:35
 
Ответить
СообщениеПремного благодарен всем! Формулы работают! репутацию поднял каждому

Автор - stas8892
Дата добавления - 23.10.2023 в 06:35
  • Страница 1 из 1
  • 1
Поиск:

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