Как легко объединить текст на основе критериев в Excel?

Предположим, у вас есть столбец идентификационных номеров с дубликатами и столбец имен. Вы хотите объединить имена на основе уникальных идентификационных номеров, как показано на снимке экрана. Как можно быстро объединить текст на основе определенных критериев в Excel? В этом руководстве представлены два метода для эффективного выполнения этой задачи.

Объединить текст на основе критериев с функцией, определяемой пользователем

Объедините текст на основе критериев с помощью Kutools for Excel

Объединить текст на основе критериев с функцией, определяемой пользователем

Чтобы объединить текст с уникальными идентификаторами, вы можете сначала извлечь уникальные значения, а затем создать функцию, определяемую пользователем, для объединения имен на основе уникального идентификатора.

1. В качестве примера возьмем следующие данные. Сначала вам нужно извлечь уникальные идентификационные номера, примените эту формулу массива: =IFERROR(INDEX($A$2:$A$15, MATCH(0,COUNTIF($D$1:D1, $A$2:$A$15), 0)),"")， Введите эту формулу в пустую ячейку, например D2, затем нажмите Shift + Ctrl + Enter ключи вместе, см. снимок экрана:

Функции: В приведенной выше формуле A2: A15 это диапазон данных списка, из которого вы хотите извлечь уникальные значения, D1 - первая ячейка столбца, в котором вы хотите вывести результат извлечения.

2. Перетащите маркер заполнения вниз, чтобы извлечь все уникальные значения, пока не отобразятся пробелы, см. снимок экрана:

3. На этом этапе вам необходимо создать Функция, определяемая пользователем для объединения имен на основе уникальных идентификационных номеров. Пожалуйста, удерживайте ALT + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.

4. Нажмите Вставить > Модулии вставьте следующий код в Модули Окно.

Код VBA: объединение текста на основе критериев

Function ConcatenateIf(CriteriaRange As Range, Condition As Variant, ConcatenateRange As Range, Optional Separator As String = ",") As Variant
'Updateby Extendoffice
Dim xResult As String
On Error Resume Next
If CriteriaRange.Count <> ConcatenateRange.Count Then
    ConcatenateIf = CVErr(xlErrRef)
    Exit Function
End If
For i = 1 To CriteriaRange.Count
    If CriteriaRange.Cells(i).Value = Condition Then
        xResult = xResult & Separator & ConcatenateRange.Cells(i).Value
    End If
Next i
If xResult <> "" Then
    xResult = VBA.Mid(xResult, VBA.Len(Separator) + 1)
End If
ConcatenateIf = xResult
Exit Function
End Function

5. Затем сохраните и закройте этот код, вернитесь на свой рабочий лист и введите эту формулу в ячейку E2, = СЦЕПИТЬЕСЛИ ($ A $ 2: $ A $ 15; D2; $ B $ 2: $ B $ 15; ",") , см. снимок экрана:

6. Затем перетащите дескриптор заполнения вниз к ячейкам, к которым вы хотите применить эту формулу, и все соответствующие имена были объединены на основе идентификационных номеров, см. Снимок экрана:

Советы:

1. В приведенной выше формуле A2: A15 исходные данные, которые вы хотите объединить на основе, D2 - уникальное значение, которое вы извлекли, и B2: B15 - это столбец имени, который вы хотите объединить.

2. Как видите, я объединил значения, разделенные запятой. Вы можете использовать любой другой символ, заменив запятую «,» в формуле по мере необходимости.

Объедините текст на основе критериев с помощью Kutools for Excel

Если вы только что Kutools for Excel, С его Расширенные ряды комбинирования Утилита вы можете быстро и удобно объединить текстовую базу по критериям.

1. Выберите диапазон данных, который вы хотите объединить, на основе одного столбца.

2. Нажмите Кутулс > Слияние и разделение > Расширенные ряды комбинирования, см. снимок экрана:

3. В Объединить строки на основе столбца диалоговом окне щелкните столбец идентификатора, а затем щелкните Основной ключ чтобы сделать этот столбец ключевым столбцом, на котором основаны ваши объединенные данные, см. снимок экрана:

4, Затем нажмите ФИО столбец, значения которого вы хотите объединить, затем щелкните Сочетать вариант и выберите один разделитель для объединенных данных, см. снимок экрана:

5. После завершения этих настроек нажмите OK для выхода из диалогового окна, а данные в столбце B объединяются на основе ключевого столбца A. Смотрите снимок экрана:

Эта функция также может помочь решить такие проблемы, как: Как объединить несколько строк в одну и суммировать дубликаты в Excel?

Демо: объединить текст на основе той же ячейки в другом столбце с помощью Kutools for Excel