Разложить данные из таблицы в отдельный столбец
Vladimir6373
Дата: Воскресенье, 24.07.2022, 10:39 |
Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 2
Репутация:
0
±
Замечаний:
0% ±
Добрый день! Имеется таблица с данными расходов по датам. Момогите с написаем формулы, чтобы данные раскладывались с столбец, как это сделано под таблицей. Причем значения должны следовать слева направо и сверху вниз, начиная с первой даты.
Добрый день! Имеется таблица с данными расходов по датам. Момогите с написаем формулы, чтобы данные раскладывались с столбец, как это сделано под таблицей. Причем значения должны следовать слева направо и сверху вниз, начиная с первой даты. Vladimir6373
Ответить
Сообщение Добрый день! Имеется таблица с данными расходов по датам. Момогите с написаем формулы, чтобы данные раскладывались с столбец, как это сделано под таблицей. Причем значения должны следовать слева направо и сверху вниз, начиная с первой даты. Автор - Vladimir6373 Дата добавления - 24.07.2022 в 10:39
Egyptian
Дата: Воскресенье, 24.07.2022, 11:37 |
Сообщение № 2
Группа: Проверенные
Ранг: Ветеран
Сообщений: 526
Репутация:
193
±
Замечаний:
0% ±
Excel 2013/2016
Формулами. Даты:Код
=IFERROR(INDEX($G$7:$G$10;AGGREGATE(15;6;(ROW($G$7:$G$10)-ROW($G$7)+1)/($H$7:$J$10<>"");ROWS(J$14:J14)));"")
Расход:Код
=IFERROR(INDEX($H$7:$J$10;AGGREGATE(15;6;(ROW($G$7:$G$10)-ROW($G$7)+1)/($H$7:$J$10<>"")/($G$7:$G$10=$J14);COUNTIF(J$14:J14;J14));AGGREGATE(15;6;(COLUMN($H$7:$J$10)-COLUMN($H$10)+1)/($H$7:$J$10<>"")/($G$7:$G$10=$J14);COUNTIF(J$14:J14;J14)));"")
Формулами. Даты:Код
=IFERROR(INDEX($G$7:$G$10;AGGREGATE(15;6;(ROW($G$7:$G$10)-ROW($G$7)+1)/($H$7:$J$10<>"");ROWS(J$14:J14)));"")
Расход:Код
=IFERROR(INDEX($H$7:$J$10;AGGREGATE(15;6;(ROW($G$7:$G$10)-ROW($G$7)+1)/($H$7:$J$10<>"")/($G$7:$G$10=$J14);COUNTIF(J$14:J14;J14));AGGREGATE(15;6;(COLUMN($H$7:$J$10)-COLUMN($H$10)+1)/($H$7:$J$10<>"")/($G$7:$G$10=$J14);COUNTIF(J$14:J14;J14)));"")
Egyptian
Сообщение отредактировал Egyptian - Воскресенье, 24.07.2022, 11:38
Ответить
Сообщение Формулами. Даты:Код
=IFERROR(INDEX($G$7:$G$10;AGGREGATE(15;6;(ROW($G$7:$G$10)-ROW($G$7)+1)/($H$7:$J$10<>"");ROWS(J$14:J14)));"")
Расход:Код
=IFERROR(INDEX($H$7:$J$10;AGGREGATE(15;6;(ROW($G$7:$G$10)-ROW($G$7)+1)/($H$7:$J$10<>"")/($G$7:$G$10=$J14);COUNTIF(J$14:J14;J14));AGGREGATE(15;6;(COLUMN($H$7:$J$10)-COLUMN($H$10)+1)/($H$7:$J$10<>"")/($G$7:$G$10=$J14);COUNTIF(J$14:J14;J14)));"")
Автор - Egyptian Дата добавления - 24.07.2022 в 11:37
Vladimir6373
Дата: Воскресенье, 24.07.2022, 11:50 |
Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 2
Репутация:
0
±
Замечаний:
0% ±
Спасибо огромное! То что надо!
Ответить
Сообщение Спасибо огромное! То что надо! Автор - Vladimir6373 Дата добавления - 24.07.2022 в 11:50
прохожий2019
Дата: Воскресенье, 24.07.2022, 12:00 |
Сообщение № 4
Группа: Проверенные
Ранг: Старожил
Сообщений: 1298
Репутация:
327
±
Замечаний:
0% ±
365 Beta Channel
напряжно, зато одной формулой:Код
=LET(d;G6:J10;x;ЧСТРОК(d)-1;y;ЧИСЛСТОЛБ(d)-1;z;MAKEARRAY(x*y;2;LAMBDA(r;c;ИНДЕКС(d;ОКРВВЕРХ(r/y+1;1);ЕСЛИ(c=1;1;ОСТАТ(r-1;y)+2))));ФИЛЬТР(z;ИНДЕКС(z;;2)))
настоящий вид формулы в русской версии: [vba]Код
=LET(d;G6:J10;x;ЧСТРОК(d)-1;y;ЧИСЛСТОЛБ(d)-1;z;MAKEARRAY(x*y;2;LAMBDA(r;c;ИНДЕКС(d;ОКРВВЕРХ(r/y+1;1);ЕСЛИ(c=1;1;ОСТАТ(r-1;y)+2))));ФИЛЬТР(z;ИНДЕКС(z;;2)))
[/vba] [p.s.](нет никакой функции ПУСТЬ и никогда не было, а LET уже несколько лет )[/p.s.]
напряжно, зато одной формулой:Код
=LET(d;G6:J10;x;ЧСТРОК(d)-1;y;ЧИСЛСТОЛБ(d)-1;z;MAKEARRAY(x*y;2;LAMBDA(r;c;ИНДЕКС(d;ОКРВВЕРХ(r/y+1;1);ЕСЛИ(c=1;1;ОСТАТ(r-1;y)+2))));ФИЛЬТР(z;ИНДЕКС(z;;2)))
настоящий вид формулы в русской версии: [vba]Код
=LET(d;G6:J10;x;ЧСТРОК(d)-1;y;ЧИСЛСТОЛБ(d)-1;z;MAKEARRAY(x*y;2;LAMBDA(r;c;ИНДЕКС(d;ОКРВВЕРХ(r/y+1;1);ЕСЛИ(c=1;1;ОСТАТ(r-1;y)+2))));ФИЛЬТР(z;ИНДЕКС(z;;2)))
[/vba] [p.s.](нет никакой функции ПУСТЬ и никогда не было, а LET уже несколько лет )[/p.s.] прохожий2019
Сообщение отредактировал прохожий2019 - Воскресенье, 24.07.2022, 12:45
Ответить
Сообщение напряжно, зато одной формулой:Код
=LET(d;G6:J10;x;ЧСТРОК(d)-1;y;ЧИСЛСТОЛБ(d)-1;z;MAKEARRAY(x*y;2;LAMBDA(r;c;ИНДЕКС(d;ОКРВВЕРХ(r/y+1;1);ЕСЛИ(c=1;1;ОСТАТ(r-1;y)+2))));ФИЛЬТР(z;ИНДЕКС(z;;2)))
настоящий вид формулы в русской версии: [vba]Код
=LET(d;G6:J10;x;ЧСТРОК(d)-1;y;ЧИСЛСТОЛБ(d)-1;z;MAKEARRAY(x*y;2;LAMBDA(r;c;ИНДЕКС(d;ОКРВВЕРХ(r/y+1;1);ЕСЛИ(c=1;1;ОСТАТ(r-1;y)+2))));ФИЛЬТР(z;ИНДЕКС(z;;2)))
[/vba] [p.s.](нет никакой функции ПУСТЬ и никогда не было, а LET уже несколько лет )[/p.s.] Автор - прохожий2019 Дата добавления - 24.07.2022 в 12:00
jakim
Дата: Воскресенье, 24.07.2022, 15:51 |
Сообщение № 5
Группа: Друзья
Ранг: Старожил
Сообщений: 1216
Репутация:
316
±
Замечаний:
0% ±
Excel 2010
Power Query
[vba]Код
let Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content], #"Unpivoted Other Columns" = Table.UnpivotOtherColumns(Source, {"Дата"}, "Attribute", "Value"), #"Removed Columns" = Table.RemoveColumns(#"Unpivoted Other Columns",{"Attribute"}), #"Changed Type" = Table.TransformColumnTypes(#"Removed Columns",{{"Дата", type date}}) in #"Changed Type"
[/vba]
Power Query
[vba]Код
let Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content], #"Unpivoted Other Columns" = Table.UnpivotOtherColumns(Source, {"Дата"}, "Attribute", "Value"), #"Removed Columns" = Table.RemoveColumns(#"Unpivoted Other Columns",{"Attribute"}), #"Changed Type" = Table.TransformColumnTypes(#"Removed Columns",{{"Дата", type date}}) in #"Changed Type"
[/vba]jakim
Ответить
Сообщение Power Query
[vba]Код
let Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content], #"Unpivoted Other Columns" = Table.UnpivotOtherColumns(Source, {"Дата"}, "Attribute", "Value"), #"Removed Columns" = Table.RemoveColumns(#"Unpivoted Other Columns",{"Attribute"}), #"Changed Type" = Table.TransformColumnTypes(#"Removed Columns",{{"Дата", type date}}) in #"Changed Type"
[/vba]Автор - jakim Дата добавления - 24.07.2022 в 15:51