Всем доброго времени суток, возникла срочная необходимость в преобразовании ячеек с интервалов годом (например первая ячейка содержит текст "18-21") в список годов в него входящих (вторая ячейка на основе первой выдает "2018, 2019, 2020, 2021") Подскажите каким образом можно это реализовать, я так и не смог найти решение. Заранее спасибо!
Всем доброго времени суток, возникла срочная необходимость в преобразовании ячеек с интервалов годом (например первая ячейка содержит текст "18-21") в список годов в него входящих (вторая ячейка на основе первой выдает "2018, 2019, 2020, 2021") Подскажите каким образом можно это реализовать, я так и не смог найти решение. Заранее спасибо!antonpolyakov161
Средствами Excel можно реализовать, но это будет довольно громоздкая формула и результат будет не в одной ячейке (можно вторым этапом конкатенировать)
Здравствуйте
Средствами Excel можно реализовать, но это будет довольно громоздкая формула и результат будет не в одной ячейке (можно вторым этапом конкатенировать)Serge_007
Serge_007, а возможно ли как-то не сильно сложно (пусть и криво) это сделать если в этих интервалах будет не сильно много вариантов, допустим минимальный год в интервале 2010, максимальный 2021, может можно сделать 11 ячеек с годами и проверять есть ли в этих ячейках год из диапазона, и если есть добавлять его в ячейку с результатом(или каждый в новую, не важно)?
Serge_007, а возможно ли как-то не сильно сложно (пусть и криво) это сделать если в этих интервалах будет не сильно много вариантов, допустим минимальный год в интервале 2010, максимальный 2021, может можно сделать 11 ячеек с годами и проверять есть ли в этих ячейках год из диапазона, и если есть добавлять его в ячейку с результатом(или каждый в новую, не важно)?antonpolyakov161
let f=(x)=>Expression.Evaluate("{"&Text.Replace(x,"-","..")&"}"), g=(x)=>Text.Combine(List.Transform(f(x),(x)=>Text.From(x+2000)),";"), from = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content], to = Table.AddColumn(from,"to",each g([from])) in to
[/vba]
PQ [vba]
Код
let f=(x)=>Expression.Evaluate("{"&Text.Replace(x,"-","..")&"}"), g=(x)=>Text.Combine(List.Transform(f(x),(x)=>Text.From(x+2000)),";"), from = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content], to = Table.AddColumn(from,"to",each g([from])) in to
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
