Как легко объединить текст на основе критериев в 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, С его Расширенные ряды комбинирования Утилита вы можете быстро и удобно объединить текстовую базу по критериям.
| Kutools for Excel : с более чем 300 удобными надстройками Excel, бесплатно и без ограничений в течение 30 дней. |
После установки Kutools for Excelвыполните следующие действия:
1. Выберите диапазон данных, который вы хотите объединить, на основе одного столбца.
2. Нажмите Кутулс > Слияние и разделение > Расширенные ряды комбинирования, см. снимок экрана:
3. В Объединить строки на основе столбца диалоговом окне щелкните столбец идентификатора, а затем щелкните Основной ключ чтобы сделать этот столбец ключевым столбцом, на котором основаны ваши объединенные данные, см. снимок экрана:
4, Затем нажмите Фамилия столбец, значения которого вы хотите объединить, затем щелкните Сочетать вариант и выберите один разделитель для объединенных данных, см. снимок экрана:
5. После завершения этих настроек нажмите OK для выхода из диалогового окна, и данные в столбце B были объединены вместе на основе ключевого столбца A. См. снимок экрана:
Благодаря этой функции в кратчайшие сроки решится следующая проблема:
Как объединить несколько строк в одну и суммировать дубликаты в Excel?
Загрузите бесплатную пробную версию Kutools for Excel прямо сейчас!
Демо: объединить текст на основе той же ячейки в другом столбце с помощью Kutools for Excel
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
