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

Вход

Регистрация

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

 

= Мир MS Excel/Нумерация внутри группировки в PQ - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Нумерация внутри группировки в PQ
elycioo Дата: Вторник, 07.03.2023, 14:24 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 37
Репутация: 0 ±
Замечаний: 40% ±

Добрый день. Помогите, пожалуйста, разобраться. Нужно сделать нумерацию внутри группировки, а не всего листа. В PQ. Прикладываю файл пример, как должно получится.
К сообщению приложен файл: numeracija_vnutri_gruppirovki.xlsx (16.4 Kb)


Сообщение отредактировал elycioo - Вторник, 07.03.2023, 14:47
 
Ответить
СообщениеДобрый день. Помогите, пожалуйста, разобраться. Нужно сделать нумерацию внутри группировки, а не всего листа. В PQ. Прикладываю файл пример, как должно получится.

Автор - elycioo
Дата добавления - 07.03.2023 в 14:24
прохожий2019 Дата: Вторник, 07.03.2023, 17:58 | Сообщение № 2
Группа: Проверенные
Ранг: Старожил
Сообщений: 1298
Репутация: 327 ±
Замечаний: 0% ±

365 Beta Channel
[vba]
Код
let
    from = Excel.CurrentWorkbook(){[Name="Таблица1_2"]}[Content],
    gr = Table.Group(from, "Группировка", {"tmp", (t)=>Table.AddIndexColumn(t,"i",1)}),
    to = Table.Combine(gr[tmp])
in
    to
[/vba]
К сообщению приложен файл: 7721489.xlsx (19.9 Kb)
 
Ответить
Сообщение[vba]
Код
let
    from = Excel.CurrentWorkbook(){[Name="Таблица1_2"]}[Content],
    gr = Table.Group(from, "Группировка", {"tmp", (t)=>Table.AddIndexColumn(t,"i",1)}),
    to = Table.Combine(gr[tmp])
in
    to
[/vba]

Автор - прохожий2019
Дата добавления - 07.03.2023 в 17:58
jakim Дата: Вторник, 07.03.2023, 18:01 | Сообщение № 3
Группа: Друзья
Ранг: Старожил
Сообщений: 1216
Репутация: 316 ±
Замечаний: 0% ±

Excel 2010
Вариант с "кнопками"

[vba]
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Таблица1_2"]}[Content],
    #"Grouped Rows" = Table.Group(Source, {"Группировка"}, {{"Count", each _, type table [Группировка=number, Артикул=number]}}),
    #"Added Custom" = Table.AddColumn(#"Grouped Rows", "Custom", each [Count][Артикул]),
    #"Removed Columns" = Table.RemoveColumns(#"Added Custom",{"Count"}),
    #"Extracted Values" = Table.TransformColumns(#"Removed Columns", {"Custom", each Text.Combine(List.Transform(_, Text.From), " "), type text}),
    #"Split Column by Delimiter" = Table.SplitColumn(#"Extracted Values", "Custom", Splitter.SplitTextByDelimiter(" ", QuoteStyle.Csv), {"Custom.1", "Custom.2", "Custom.3", "Custom.4", "Custom.5", "Custom.6", "Custom.7", "Custom.8", "Custom.9", "Custom.10", "Custom.11"}),
    #"Transposed Table" = Table.Transpose(#"Split Column by Delimiter"),
    #"Promoted Headers" = Table.PromoteHeaders(#"Transposed Table", [PromoteAllScalars=true]),
    #"Added Index" = Table.AddIndexColumn(#"Promoted Headers", "Index", 1, 1, Int64.Type),
    #"Unpivoted Other Columns" = Table.UnpivotOtherColumns(#"Added Index", {"Index"}, "Attribute", "Value"),
    #"Sorted Rows" = Table.Sort(#"Unpivoted Other Columns",{{"Attribute", Order.Ascending}, {"Index", Order.Ascending}}),
    #"Changed Type" = Table.TransformColumnTypes(#"Sorted Rows",{{"Attribute", Int64.Type}, {"Value", Int64.Type}}),
    #"Reordered Columns" = Table.ReorderColumns(#"Changed Type",{"Attribute", "Value", "Index"})
in
    #"Reordered Columns"
[/vba]
К сообщению приложен файл: numeracija_vnutri_gruppirovki_.xlsx (19.3 Kb)
 
Ответить
Сообщение
Вариант с "кнопками"

[vba]
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Таблица1_2"]}[Content],
    #"Grouped Rows" = Table.Group(Source, {"Группировка"}, {{"Count", each _, type table [Группировка=number, Артикул=number]}}),
    #"Added Custom" = Table.AddColumn(#"Grouped Rows", "Custom", each [Count][Артикул]),
    #"Removed Columns" = Table.RemoveColumns(#"Added Custom",{"Count"}),
    #"Extracted Values" = Table.TransformColumns(#"Removed Columns", {"Custom", each Text.Combine(List.Transform(_, Text.From), " "), type text}),
    #"Split Column by Delimiter" = Table.SplitColumn(#"Extracted Values", "Custom", Splitter.SplitTextByDelimiter(" ", QuoteStyle.Csv), {"Custom.1", "Custom.2", "Custom.3", "Custom.4", "Custom.5", "Custom.6", "Custom.7", "Custom.8", "Custom.9", "Custom.10", "Custom.11"}),
    #"Transposed Table" = Table.Transpose(#"Split Column by Delimiter"),
    #"Promoted Headers" = Table.PromoteHeaders(#"Transposed Table", [PromoteAllScalars=true]),
    #"Added Index" = Table.AddIndexColumn(#"Promoted Headers", "Index", 1, 1, Int64.Type),
    #"Unpivoted Other Columns" = Table.UnpivotOtherColumns(#"Added Index", {"Index"}, "Attribute", "Value"),
    #"Sorted Rows" = Table.Sort(#"Unpivoted Other Columns",{{"Attribute", Order.Ascending}, {"Index", Order.Ascending}}),
    #"Changed Type" = Table.TransformColumnTypes(#"Sorted Rows",{{"Attribute", Int64.Type}, {"Value", Int64.Type}}),
    #"Reordered Columns" = Table.ReorderColumns(#"Changed Type",{"Attribute", "Value", "Index"})
in
    #"Reordered Columns"
[/vba]

Автор - jakim
Дата добавления - 07.03.2023 в 18:01
  • Страница 1 из 1
  • 1
Поиск:

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