Оглавление
Excel является одним из наиболее широко используемых инструментов, когда мы работаем с наборами данных. Нам часто требуется Excel на объединять клетки с одинаковое значение В этой статье я расскажу, как объединять клетки с одинаковое значение в Excel .
Скачать Практическое пособие
Объединить ячейки с одинаковым значением.xlsmЭто набор данных Я собираюсь использовать для объяснения методов. Здесь у нас есть несколько продавцов и список Продукция которые они продали. Я буду комбайн сайт одинаковые значения .
3 метода объединения ячеек с одинаковым значением в Excel
1. использование функций IF & CONCATENATE в Excel для объединения ячеек с одинаковым значением
Во-первых, я покажу вам, как объединять клетки с одинаковое значение используя МФ и КОНКАТЕНАТ функции вместе.
ШАГ-1: СОЗДАНИЕ ПРОМЕЖУТОЧНОГО СТОЛБЦА
➤ Во-первых, мне нужно создать промежуточная колонка где все предметы будут перечислены .
➤ Затем перейдите к D5 . запишите следующую формулу
=IF(B5=B4,D4&","&C5,C5) 
Здесь, в ЕСЛИ функция логическое утверждение это B5=B4 , если это TRUE он вернется D4&", "&C5 (который в конечном итоге Промежуточная колонна, ноутбук ), и если FALSE , это даст C5 в качестве вывода. Поскольку заявление FALSE мы имеем C5 как выход.
➤ Затем нажмите ENTER . Excel вернет вывод.
➤ После этого используйте Наполнительная рукоятка на Автозаполнение до D14 .
ШАГ-2: СОЗДАНИЕ СПИСКА
Для создания Окончательный список Я буду использовать комбинацию из ЕСЛИ и CONCATENATE функции.
➤ Создайте новый столбец, " Окончательный список" .
➤ Перейти к E5 и запишите формулу
=IF(B5B6,CONCATENATE(B5," ", "продано"," ",D5),"") 
Формула разбивки:
" " -> Она создает пространство.
- CONCATENATE(B5," ", "продано"," ",D5) -> Конкатенирует слова или ячейки.
- Выход: Алекс Морган продал ноутбук
IF(B5B6,CONCATENATE(B5," ", "продано"," ",D5),"") -> Возвращает вывод после анализа логического оператора B5B6 .
- IF(FALSE,{Алекс Морган продал ноутбук},{})
- Выход: {}
➤ Теперь нажмите ENTER . Excel вернет вывод.
Затем используйте Наполнительная рукоятка на Автозаполнение до E14 .
➤ Теперь выберите весь набор данных .
➤ Затем перейдите к Данные вкладка>> выбрать Сортировка и фильтр >> выбрать Фильтр .
Затем выберите выпадающий (см. изображение).
➤ После этого, снять флажок сайт Заготовки и нажмите кнопку OK .
Вы получите список с одинаковые значения .
ПРИМЕЧАНИЕ:
В этом методе вы должны помнить, что одинаковые значения должны находиться рядом друг с другом. Например, я отсортировал набор данных таким образом, что клетки имеющий Алекс Морган прилегают друг к другу.
Читать далее: Как объединить ячейки с помощью формулы Excel (6 методов)
2. Использование функции консолидации для объединения ячеек с одинаковым значением в Excel
Теперь я покажу, как использовать Функция консолидации на объединять клетки с одинаковое значение Для выполнения этого метода я добавил функцию Цена продажи колонка .
ШАГИ:
➤ Выберите F4 Затем перейдите к Данные вкладка>> Инструменты для работы с данными >> выбрать Консолидировать .
➤ A Консолидировать Появится диалоговое окно. Установите функцию Сумма поскольку вы собираетесь суммировать одни и те же значения. Затем установите ссылка . Вся таблица B4:D14 это мой диапазон.
➤ Нажмите Добавить .
➤ Excel добавит ссылку. Затем отметьте Левая колонка и нажмите OK .
➤ Excel объединит одинаковые значения и возвращают суммы.
➤ Сейчас формат как пожелаете.
3. Применение VBA для объединения ячеек с одинаковым значением
Теперь я буду применять VBA перечислить одинаковые значения в набор данных .
ШАГИ:
➤ Нажмите ALT + F11 чтобы открыть окно VBA .
окно VBA откроется. Затем перейдите к Вставка >> Модуль
➤ Введите следующий код в Модуль .
Sub CombineCells() Dim Col As New Collection Dim Sr As Variant Dim Rs() As Variant Dim M As Long Dim N As Long Dim Rg As Range Sr = Range("B4", Cells(Rows.Count, "B").End(xlUp)).Resize(, 2) Set Rg = Range("E4") On Error Resume Next For M = 2 To UBound(Sr) Col.Add Sr(M, 1), TypeName(Sr(M, 1)) & CStr(Sr(M, 1)) Next M On Error GoTo 0ReDim Rs(1 To Col.Count + 1, 1 To 2) Rs(1, 1) = "Название" Rs(1, 2) = "Продукция" For M = 1 To Col.Count Rs(M + 1, 1) = Col(M) For N = 2 To UBound(Sr) If Sr(N, 1) = Rs(M + 1, 1) Then Rs(M + 1, 2) = Rs(M + 1, 2) & ", " & Sr(N, 2) End If Next N Rs(M + 1, 2) = Mid(Rs(M + 1, 2), 2) Next M Set Rg =Rg.Resize(UBound(Rs, 1), UBound(Rs, 2)) Rg.NumberFormat = "@" Rg = Rs Rg.EntireColumn.AutoFit End Sub 
Здесь я создал Подпроцедура " CombineCells " . Затем с неяркое заявление Я заявил Col , Старший , Rs , M , N , Rg как переменные.
Сайт переменная Rg устанавливается на E4 что указывает на то, что результат будет отображаться на E4 .
Затем я использовал Для цикла чтобы перечислить продукты. Я использовал Функция Ubound с Rs в качестве arrayname .
➤ Затем нажмите F5 чтобы запустить программу. Excel будет объединить имена .
Тогда вы можете формат как вы хотите.
Читать далее: Как объединить ячейки в одну с разрывом строки в Excel (5 методов)
Практическая рабочая тетрадь
Практика делает человека совершенным. Вот почему я приложил практический лист для вас.
Заключение
В этой статье я объяснил 3 способы в Excel, чтобы объединять клетки с одинаковое значение И, наконец, если у вас есть какие-либо предложения, идеи или отзывы, пожалуйста, оставляйте свои комментарии ниже.
