Перенос данных из заголовков по критерию

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

Перенос данных из заголовков по критерию (Формулы/Formulas)

DSA

Дата: Вторник, 19.09.2017, 12:27 | Сообщение № 1

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

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

Сообщений: 28

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

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

Excel 2010

Добрый день!

Возникла проблема при переносе данных из заголовков в ячейки по определенному критерию.
Суть проблемы в том, что если два значения в нескольких столбцах будут равны, нам необходимо перенести данные из двух заголовков в одну ячейку.
Как это сделать пока не понимаю.

Файл с примером решения во вложении.
заранее благодарен за помощь.

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

Ответить

ZORRO2005

Дата: Вторник, 19.09.2017, 12:43 | Сообщение № 2

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

Ранг: Обитатель

Сообщений: 382

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

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

Excel2010

K2:

Код

=ПСТР(ЕСЛИ(C2=$I2;", "&C$1;"")&ЕСЛИ(D2=$I2;", "&D$1;"")&ЕСЛИ(E2=$I2;", "&E$1;"")&ЕСЛИ(F2=$I2;", "&F$1;"")&ЕСЛИ(G2=$I2;", "&G$1;"");3;999)

Сообщение отредактировал ZORRO2005 - Вторник, 19.09.2017, 12:45

Ответить

DSA

Дата: Вторник, 19.09.2017, 12:54 | Сообщение № 3

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

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

Сообщений: 28

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

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

Excel 2010

ZORRO2005,
Спасибо все получилось,
но формула очень большая и если я еще добавлю столбцы, то она станет еще больше(((
Хотелось бы что-нибудь универсальное.

Ответить

vikttur

Дата: Вторник, 19.09.2017, 13:03 | Сообщение № 4

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

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

Сообщений: 2941

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

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

Если код на VBA (макрос), не будет ли следующего "но"?
[vba]

Код

Function MergeHead(rVal As Range, rHead As Range, dVal As Double, _
                    Optional sSym As String = ", ") As String
Dim sStr As String
Dim j As Long
    For j = 1 To rVal.Cells.Count
        If rVal(j).Value = dVal Then sStr = sStr & sSym & rHead(j).Value
    Next j

    MergeHead = Mid$(sStr, Len(sSym) + 1)
End Function

[/vba]
В ячейке

Код

=MergeHead(диапазон_значений;диапазон_заголовков;значение;[разделитель])

Разделитель по умолчанию ", "