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

Вход

Регистрация

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

 

= Мир MS Excel/PQ выделить комментарии из разных столбцов в один - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
PQ выделить комментарии из разных столбцов в один
Anis625 Дата: Пятница, 20.01.2023, 11:06 | Сообщение № 1
Группа: Заблокированные
Ранг: Ветеран
Сообщений: 674
Репутация: 31 ±
Замечаний: 20% ±

Excel 2013
Добрый день, всем участникам форума!
Подскажите, пожалуйста, возможно ли каким-либо образом выделить после превращения из не плоской таблицы в плоскую (unpivot) все комментарии в один столбец? Пробовал как в Excel поставить * в конце слова - не сработало, попробовал даже вкрутить Text.Contains - результат тот же, но возможно не правильно прописал, т.к. там нужно ссылаться на столбец и искать в нем, а тут несколько столбцов.
Буду признателен за любой совет или подсказку на решение задачки.
Update (11:19) - количество периодов и соответственно комментариев будет расширяться
К сообщению приложен файл: _ExcelWorld.xlsx (21.5 Kb)


Сообщение отредактировал Anis625 - Пятница, 20.01.2023, 11:21
 
Ответить
СообщениеДобрый день, всем участникам форума!
Подскажите, пожалуйста, возможно ли каким-либо образом выделить после превращения из не плоской таблицы в плоскую (unpivot) все комментарии в один столбец? Пробовал как в Excel поставить * в конце слова - не сработало, попробовал даже вкрутить Text.Contains - результат тот же, но возможно не правильно прописал, т.к. там нужно ссылаться на столбец и искать в нем, а тут несколько столбцов.
Буду признателен за любой совет или подсказку на решение задачки.
Update (11:19) - количество периодов и соответственно комментариев будет расширяться

Автор - Anis625
Дата добавления - 20.01.2023 в 11:06
Anis625 Дата: Понедельник, 23.01.2023, 08:09 | Сообщение № 2
Группа: Заблокированные
Ранг: Ветеран
Сообщений: 674
Репутация: 31 ±
Замечаний: 20% ±

Excel 2013
Не возможно?
 
Ответить
СообщениеНе возможно?

Автор - Anis625
Дата добавления - 23.01.2023 в 08:09
NikitaDvorets Дата: Понедельник, 23.01.2023, 10:27 | Сообщение № 3
Группа: Авторы
Ранг: Ветеран
Сообщений: 611
Репутация: 142 ±
Замечаний: 0% ±

Excel 2019
Anis625, добрый день.
Если правильно понял, макрос на листе "Комментарии-в-1"
К сообщению приложен файл: Test-363_--1_23.xlsm (34.5 Kb)
 
Ответить
СообщениеAnis625, добрый день.
Если правильно понял, макрос на листе "Комментарии-в-1"

Автор - NikitaDvorets
Дата добавления - 23.01.2023 в 10:27
прохожий2019 Дата: Понедельник, 23.01.2023, 19:47 | Сообщение № 4
Группа: Проверенные
Ранг: Старожил
Сообщений: 1298
Репутация: 327 ±
Замечаний: 0% ±

365 Beta Channel
[vba]
Код
let
    from = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    unpiv = Table.UnpivotOtherColumns(from, {"Показатели"}, "Период", "Значение"),
    lst = List.Buffer(unpiv[Значение]),
    add = Table.AddIndexColumn(unpiv, "Комментарий", 1,1),
    tr = Table.TransformColumns(add,{"Комментарий",(i)=>[a=lst{i},b=if a is text then a else null][b]}),
    to = Table.SelectRows(tr, each not Text.StartsWith([Период], "Ком"))
in
    to
[/vba]
В профильной группе решили
 
Ответить
Сообщение[vba]
Код
let
    from = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    unpiv = Table.UnpivotOtherColumns(from, {"Показатели"}, "Период", "Значение"),
    lst = List.Buffer(unpiv[Значение]),
    add = Table.AddIndexColumn(unpiv, "Комментарий", 1,1),
    tr = Table.TransformColumns(add,{"Комментарий",(i)=>[a=lst{i},b=if a is text then a else null][b]}),
    to = Table.SelectRows(tr, each not Text.StartsWith([Период], "Ком"))
in
    to
[/vba]
В профильной группе решили

Автор - прохожий2019
Дата добавления - 23.01.2023 в 19:47
Anis625 Дата: Среда, 01.02.2023, 14:51 | Сообщение № 5
Группа: Заблокированные
Ранг: Ветеран
Сообщений: 674
Репутация: 31 ±
Замечаний: 20% ±

Excel 2013
прохожий2019, Спасибо Вам большое за решение задачки. Без всякой надежды посмотрел, а от вас уже есть решение. Спасибо огромное. Буду изучать.
 
Ответить
Сообщениепрохожий2019, Спасибо Вам большое за решение задачки. Без всякой надежды посмотрел, а от вас уже есть решение. Спасибо огромное. Буду изучать.

Автор - Anis625
Дата добавления - 01.02.2023 в 14:51
  • Страница 1 из 1
  • 1
Поиск:

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