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

Вход

Регистрация

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

 

= Мир MS Excel/В таблице с 10ю параметрами, выписать все возможные варианты - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » В таблице с 10ю параметрами, выписать все возможные варианты (Формулы/Formulas)
В таблице с 10ю параметрами, выписать все возможные варианты
dfobos Дата: Суббота, 23.05.2020, 22:17 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 41
Репутация: 0 ±
Замечаний: 20% ±

Всем привет, есть 10 параметров. В каждом параметре разное кол-во значений.
Нужно сделать список из всех возможных значений, но только по любым 4м, 3м или 2м параметрам.
К сообщению приложен файл: 4795034.xlsx (9.2 Kb)


Сообщение отредактировал dfobos - Суббота, 23.05.2020, 22:17
 
Ответить
СообщениеВсем привет, есть 10 параметров. В каждом параметре разное кол-во значений.
Нужно сделать список из всех возможных значений, но только по любым 4м, 3м или 2м параметрам.

Автор - dfobos
Дата добавления - 23.05.2020 в 22:17
krosav4ig Дата: Воскресенье, 24.05.2020, 16:09 | Сообщение № 2
Группа: Друзья
Ранг: Старожил
Сообщений: 2346
Репутация: 989 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Добрый день
Вариант в Power Query
[vba]
Код
let
    Source = List.Buffer(List.Transform(Table.ToColumns(Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content]),List.RemoveNulls)),
    fn     = (n,k,optional i, optional j)=>
             let
                 i   = if i=null then 0 else i,
                 j   = if j=null then 0 else j,
                 tbl = Table.FromRecords(
                           List.TransformMany(
                    {i..n-k+j},
                    each Source{_},
                    (a,b)=>[x=b]&(if j<k-1 then [y=@fn(n,k,a+1,j+1)] else [])
                           )
                       )
             in
                 if j<k-1
                     then Table.ExpandTableColumn(
                         tbl,
                         "y",
                         {"x"}&List.Transform({j+1..k-2}, each "x"&Text.From(_+1)),
                         List.Transform({j+1..k-1}, each "x"&Text.From(_))
                     )
                 else tbl,
    ret    = fn(List.Count(Source),4)
in
    ret
[/vba]
кросс
К сообщению приложен файл: 9191583.xlsx (20.4 Kb)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
СообщениеДобрый день
Вариант в Power Query
[vba]
Код
let
    Source = List.Buffer(List.Transform(Table.ToColumns(Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content]),List.RemoveNulls)),
    fn     = (n,k,optional i, optional j)=>
             let
                 i   = if i=null then 0 else i,
                 j   = if j=null then 0 else j,
                 tbl = Table.FromRecords(
                           List.TransformMany(
                    {i..n-k+j},
                    each Source{_},
                    (a,b)=>[x=b]&(if j<k-1 then [y=@fn(n,k,a+1,j+1)] else [])
                           )
                       )
             in
                 if j<k-1
                     then Table.ExpandTableColumn(
                         tbl,
                         "y",
                         {"x"}&List.Transform({j+1..k-2}, each "x"&Text.From(_+1)),
                         List.Transform({j+1..k-1}, each "x"&Text.From(_))
                     )
                 else tbl,
    ret    = fn(List.Count(Source),4)
in
    ret
[/vba]
кросс

Автор - krosav4ig
Дата добавления - 24.05.2020 в 16:09
dfobos Дата: Воскресенье, 24.05.2020, 16:27 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 41
Репутация: 0 ±
Замечаний: 20% ±

А если у меня параметров будет больше, что нужно изменить?
 
Ответить
СообщениеА если у меня параметров будет больше, что нужно изменить?

Автор - dfobos
Дата добавления - 24.05.2020 в 16:27
krosav4ig Дата: Воскресенье, 24.05.2020, 16:36 | Сообщение № 4
Группа: Друзья
Ранг: Старожил
Сообщений: 2346
Репутация: 989 ±
Замечаний: 0% ±

Excel 2007,2010,2013
добавить их в таблицу Таблица1, и обновить таблицу Таблица1_2
в запросе 4 - это необходимое количество элементов в сочетании


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениедобавить их в таблицу Таблица1, и обновить таблицу Таблица1_2
в запросе 4 - это необходимое количество элементов в сочетании

Автор - krosav4ig
Дата добавления - 24.05.2020 в 16:36
dfobos Дата: Понедельник, 25.05.2020, 13:07 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 41
Репутация: 0 ±
Замечаний: 20% ±

в запросе 4 - это необходимое количество элементов в сочетании

а как поправить на 3 запроса?
 
Ответить
Сообщение
в запросе 4 - это необходимое количество элементов в сочетании

а как поправить на 3 запроса?

Автор - dfobos
Дата добавления - 25.05.2020 в 13:07
Мир MS Excel » Вопросы и решения » Вопросы по Excel » В таблице с 10ю параметрами, выписать все возможные варианты (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

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