прописать формулу с текстовым отображением

Страница 1 из 1 1
Модератор форума: китин, _Boroda_, DrMini

прописать формулу с текстовым отображением (Формулы/Formulas)

Andrey_svk

Дата: Пятница, 08.02.2019, 11:11 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 32

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

В ячейку =инфо (и так в низ по таблице) необходимо вывести информацию (а, б, …. е) если цифры совпадают с ячейкой 14,00 RUB и массивом D4-I4. Применял разные функции, но что то мой мозг не может это сделать. Вот такая вот задачка от знакомой. Структура таблицы такая и не должна быть видоизмененной!!! Думаю такую задачку оценят знатоки Экселя)

К сообщению приложен файл: 6576421.xlsx (11.2 Kb)

Ответить

vikttur

Дата: Пятница, 08.02.2019, 11:26 | Сообщение № 2

Группа: Друзья

Ранг: Участник клуба

Сообщений: 2941

Репутация: 526 ±

Замечаний: 0% ±

Код

=ИНДЕКС(R2C4:R2C9;ПОИСКПОЗ(RC[-1];RC[2]:RC[7];))

Код

=ИНДЕКС($D$2:$I$2;ПОИСКПОЗ(A4;D4:I4;))

Ответить

Andrey_svk

Дата: Пятница, 08.02.2019, 11:38 | Сообщение № 3

Группа: Пользователи

Ранг: Новичок

Сообщений: 32

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

Код

=ИНДЕКС(R2C4:R2C9;ПОИСКПОЗ(RC[-1];RC[2]:RC[7];))

Это та да, но если две, три..... и т.д. ячейки показала. Вот в этом и загвоздка. Что б вывела всю текстовую информацию, а не по первому совпадению.
Спасибо vikttur за отзыв)

Сообщение отредактировал Andrey_svk - Пятница, 08.02.2019, 12:37

Ответить

китин

Дата: Пятница, 08.02.2019, 11:46 | Сообщение № 4

Группа: Модераторы

Ранг: Экселист

Сообщений: 7034

Репутация: 1079 ±

Замечаний: 0% ±

Excel 2007;2010;2016

Andrey_svk, оформите формулу тэгами в соответствии с Правилами форума. пояснялка тут

Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852

Ответить

sboy

Дата: Пятница, 08.02.2019, 13:42 | Сообщение № 5

Группа: Друзья

Ранг: Участник клуба

Сообщений: 2566

Репутация: 724 ±

Замечаний: 0% ±

Excel 2010

Добрый день.
Лень в пятницу думать, поэтому написал через пользовательскую
[vba]

Код

Function Andrey_svk(d As Double, txt As Range, dgt As Range) As String
    d_arr = dgt.Value
    txt_arr = txt.Value
        For i = 1 To UBound(d_arr, 2)
            If d = d_arr(1, i) Then Andrey_svk = Andrey_svk & txt_arr(1, i) & ","
        Next
    len_f = Len(Andrey_svk)
    If len_f > 0 Then Andrey_svk = Left(Andrey_svk, len_f - 1)
End Function

[/vba]

К сообщению приложен файл: 6576421.xlsm (16.7 Kb)

Яндекс: 410016850021169

Ответить

bmv98rus

Дата: Пятница, 08.02.2019, 14:00 | Сообщение № 6

Группа: Друзья

Ранг: Участник клуба

Сообщений: 4147

Репутация: 772 ±

Замечаний: 0% ±

Excel 2013/2016

Цитата sboy, 08.02.2019 в 13:42, в сообщении № 5 ()

Лень в пятницу думать

че тут думать, пилить надо

Код

=SUBSTITUTE(TRIM(IF(D4=$A4;D$2;"")&IF(E4=$A4;" "&E$2;"")&IF(F4=$A4;" "&F$2;"")&IF(G4=$A4;" "&G$2;"")&IF(H4=$A4;" "&H$2;"")&IF(I4=$A4;" "&I$2;""));" ";", ")

Естественно для ограниченного числа столбцов и если нет пробелов в значениях шапки.

~~Замечательный~~ Временно просто медведь ~~, процентов на 20~~.

Ответить

прописать формулу с текстовым отображением (Формулы/Formulas)

Страница 1 из 1
1