Непростой поиск/подсчёт и запись через запятую.
Jingo
Дата: Воскресенье, 03.06.2018, 08:19 |
Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 52
Репутация:
0
±
Замечаний:
40% ±
Excel 2007
Доброе утро, уважаемые! Есть два столбца слева, где в левой колонке однородные атрибуты и список людей с одинаковыми фамилиями - вторая колонка. Необходимо подсчитать для каждой фамилии набор цветов, которые встречались хотя бы раз - для каждой фамилии (но не для каждого человека, пример в в файле).
Доброе утро, уважаемые! Есть два столбца слева, где в левой колонке однородные атрибуты и список людей с одинаковыми фамилиями - вторая колонка. Необходимо подсчитать для каждой фамилии набор цветов, которые встречались хотя бы раз - для каждой фамилии (но не для каждого человека, пример в в файле). Jingo
Сообщение отредактировал Jingo - Воскресенье, 03.06.2018, 09:11
Ответить
Сообщение Доброе утро, уважаемые! Есть два столбца слева, где в левой колонке однородные атрибуты и список людей с одинаковыми фамилиями - вторая колонка. Необходимо подсчитать для каждой фамилии набор цветов, которые встречались хотя бы раз - для каждой фамилии (но не для каждого человека, пример в в файле). Автор - Jingo Дата добавления - 03.06.2018 в 08:19
Светлый
Дата: Воскресенье, 03.06.2018, 10:14 |
Сообщение № 2
Группа: Друзья
Ранг: Старожил
Сообщений: 1829
Репутация:
510
±
Замечаний:
0% ±
Excel 2013, 2016
На скорую руку получилась массивная (Ctrl+Shift+Enter) формула:Код
=ПОДСТАВИТЬ(ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;"");МИН(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39))))&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;"");НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));2));)&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;"");НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));3));)&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;"");НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));4));)&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;"");НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));5));)&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;"");НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));6)););" ,";)
На скорую руку получилась массивная (Ctrl+Shift+Enter) формула:Код
=ПОДСТАВИТЬ(ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;"");МИН(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39))))&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;"");НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));2));)&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;"");НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));3));)&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;"");НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));4));)&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;"");НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));5));)&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;"");НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));6)););" ,";)
Светлый
Программировать проще, чем писать стихи.
Ответить
Сообщение На скорую руку получилась массивная (Ctrl+Shift+Enter) формула:Код
=ПОДСТАВИТЬ(ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;"");МИН(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39))))&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;"");НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));2));)&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;"");НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));3));)&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;"");НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));4));)&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;"");НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));5));)&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;"");НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));6)););" ,";)
Автор - Светлый Дата добавления - 03.06.2018 в 10:14
Светлый
Дата: Воскресенье, 03.06.2018, 10:53 |
Сообщение № 3
Группа: Друзья
Ранг: Старожил
Сообщений: 1829
Репутация:
510
±
Замечаний:
0% ±
Excel 2013, 2016
Немного модифицировал:Код
=ИНДЕКС(A:A;МИН(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39))))&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;1/0);НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));2));"")&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;1/0);НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));3));"")&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;1/0);НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));4));"")&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;1/0);НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));5));"")&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;1/0);НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));6));"")
Немного модифицировал:Код
=ИНДЕКС(A:A;МИН(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39))))&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;1/0);НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));2));"")&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;1/0);НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));3));"")&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;1/0);НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));4));"")&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;1/0);НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));5));"")&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;1/0);НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));6));"")
Светлый
Программировать проще, чем писать стихи.
Ответить
Сообщение Немного модифицировал:Код
=ИНДЕКС(A:A;МИН(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39))))&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;1/0);НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));2));"")&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;1/0);НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));3));"")&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;1/0);НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));4));"")&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;1/0);НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));5));"")&ЕСЛИОШИБКА(", "&ИНДЕКС(ЕСЛИ(ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39);A$1:A$39;1/0);НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));6));"")
Автор - Светлый Дата добавления - 03.06.2018 в 10:53
Nic70y
Дата: Воскресенье, 03.06.2018, 11:11 |
Сообщение № 4
Группа: Друзья
Ранг: Экселист
Сообщений: 8759
Репутация:
2273
±
Замечаний:
0% ±
Excel 2010
доп.столбцы
ЮMoney 41001841029809
Ответить
Сообщение доп.столбцы Автор - Nic70y Дата добавления - 03.06.2018 в 11:11
Светлый
Дата: Воскресенье, 03.06.2018, 11:41 |
Сообщение № 5
Группа: Друзья
Ранг: Старожил
Сообщений: 1829
Репутация:
510
±
Замечаний:
0% ±
Excel 2013, 2016
Формулу переделал:Код
=ИНДЕКС(A:A;МИН(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39))))&ЕСЛИОШИБКА(", "&ИНДЕКС(A:A;НАИМЕНЬШИЙ(ЕСЛИ((ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39))*ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));2));)&ЕСЛИОШИБКА(", "&ИНДЕКС(A:A;НАИМЕНЬШИЙ(ЕСЛИ((ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39))*ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));3));)&ЕСЛИОШИБКА(", "&ИНДЕКС(A:A;НАИМЕНЬШИЙ(ЕСЛИ((ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39))*ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));4));)&ЕСЛИОШИБКА(", "&ИНДЕКС(A:A;НАИМЕНЬШИЙ(ЕСЛИ((ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39))*ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));5));)
Рассчитано на 5 цветов, но можно конец формулыКод
&ЕСЛИОШИБКА(", "&ИНДЕКС(A:A;НАИМЕНЬШИЙ(ЕСЛИ((ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39))*ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));5));)
добавить в конец и исправить 5 на 6 и т.д. до максимального количества цветов.
Формулу переделал:Код
=ИНДЕКС(A:A;МИН(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39))))&ЕСЛИОШИБКА(", "&ИНДЕКС(A:A;НАИМЕНЬШИЙ(ЕСЛИ((ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39))*ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));2));)&ЕСЛИОШИБКА(", "&ИНДЕКС(A:A;НАИМЕНЬШИЙ(ЕСЛИ((ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39))*ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));3));)&ЕСЛИОШИБКА(", "&ИНДЕКС(A:A;НАИМЕНЬШИЙ(ЕСЛИ((ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39))*ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));4));)&ЕСЛИОШИБКА(", "&ИНДЕКС(A:A;НАИМЕНЬШИЙ(ЕСЛИ((ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39))*ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));5));)
Рассчитано на 5 цветов, но можно конец формулыКод
&ЕСЛИОШИБКА(", "&ИНДЕКС(A:A;НАИМЕНЬШИЙ(ЕСЛИ((ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39))*ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));5));)
добавить в конец и исправить 5 на 6 и т.д. до максимального количества цветов. Светлый
Программировать проще, чем писать стихи.
Ответить
Сообщение Формулу переделал:Код
=ИНДЕКС(A:A;МИН(ЕСЛИ(ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39))))&ЕСЛИОШИБКА(", "&ИНДЕКС(A:A;НАИМЕНЬШИЙ(ЕСЛИ((ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39))*ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));2));)&ЕСЛИОШИБКА(", "&ИНДЕКС(A:A;НАИМЕНЬШИЙ(ЕСЛИ((ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39))*ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));3));)&ЕСЛИОШИБКА(", "&ИНДЕКС(A:A;НАИМЕНЬШИЙ(ЕСЛИ((ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39))*ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));4));)&ЕСЛИОШИБКА(", "&ИНДЕКС(A:A;НАИМЕНЬШИЙ(ЕСЛИ((ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39))*ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));5));)
Рассчитано на 5 цветов, но можно конец формулыКод
&ЕСЛИОШИБКА(", "&ИНДЕКС(A:A;НАИМЕНЬШИЙ(ЕСЛИ((ПОИСКПОЗ(A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);A$1:A$39&" "&ЛЕВБ(B$1:B$39;ПОИСК(" ";B$1:B$39&" ")-1);)=СТРОКА($1:$39))*ЕЧИСЛО(ПОИСК(D1;B$1:B$39));СТРОКА($1:$39));5));)
добавить в конец и исправить 5 на 6 и т.д. до максимального количества цветов. Автор - Светлый Дата добавления - 03.06.2018 в 11:41
Jingo
Дата: Воскресенье, 03.06.2018, 18:01 |
Сообщение № 6
Группа: Пользователи
Ранг: Участник
Сообщений: 52
Репутация:
0
±
Замечаний:
40% ±
Excel 2007
Спасибо, уважаемые. Но не могу всё же решить свою проблему. Мы имеем два(1,2) столбца слева фиксированных и справа в третий(3) столбец мы добавляем для проверки ту или иную фамилию а уже правее - в четвёртой (4) должен появится текст, содержащий строку из неповторяющихся в любом порядке цветов, которые есть напротив человека с фамилией во втором столбце.
Спасибо, уважаемые. Но не могу всё же решить свою проблему. Мы имеем два(1,2) столбца слева фиксированных и справа в третий(3) столбец мы добавляем для проверки ту или иную фамилию а уже правее - в четвёртой (4) должен появится текст, содержащий строку из неповторяющихся в любом порядке цветов, которые есть напротив человека с фамилией во втором столбце. Jingo
Сообщение отредактировал Jingo - Воскресенье, 03.06.2018, 18:25
Ответить
Сообщение Спасибо, уважаемые. Но не могу всё же решить свою проблему. Мы имеем два(1,2) столбца слева фиксированных и справа в третий(3) столбец мы добавляем для проверки ту или иную фамилию а уже правее - в четвёртой (4) должен появится текст, содержащий строку из неповторяющихся в любом порядке цветов, которые есть напротив человека с фамилией во втором столбце. Автор - Jingo Дата добавления - 03.06.2018 в 18:01
Светлый
Дата: Воскресенье, 03.06.2018, 22:36 |
Сообщение № 7
Группа: Друзья
Ранг: Старожил
Сообщений: 1829
Репутация:
510
±
Замечаний:
0% ±
Excel 2013, 2016
Фамилии вычисляются автоматически, цвета тоже.
Фамилии вычисляются автоматически, цвета тоже. Светлый
Программировать проще, чем писать стихи.
Ответить
Сообщение Фамилии вычисляются автоматически, цвета тоже. Автор - Светлый Дата добавления - 03.06.2018 в 22:36