Как удалить все дубликаты в Excel, оставив только одно уникальное значение?
В этом руководстве описаны способы удаления всех дублирующихся значений из списка в Excel с сохранением только одного экземпляра каждого. Подробнее:
Удаление всех дубликатов с сохранением только одного с помощью функции Удалить дубликаты
Удаление всех дубликатов с сохранением только одного с помощью VBA
Удаление всех дубликатов с сохранением только одного с помощью Kutools для Excel 
Объединение всех Дублирующая строка и сохранение данных с помощью Kutools для Excel
Удаление всех дубликатов с сохранением только одного с помощью функции Удалить дубликаты
В Excel функция «Удалить дубликаты» удаляет все повторяющиеся значения, оставляя только один уникальный экземпляр.
1. Выделите нужный диапазон данных и нажмите Данные > Удалить дубликаты. См. снимок экрана:
2. Затем в диалоговом окне Удалить дубликаты установите флажок напротив имени столбца, из которого нужно удалить дубликаты. Если ваши данные содержат заголовки, также установите флажок Включить заголовки. См. снимок экрана:
3. Нажмите ОК. Появится диалоговое окно с информацией о количестве удалённых дубликатов — просто закройте его. Теперь все дубликаты удалены, и в списке остался только один экземпляр каждого значения.
Удаление всех дубликатов с сохранением только одного с помощью VBA
Если вы интересуетесь VBA, ниже также приведён код на VBA для решения этой задачи.
1. Нажмите одновременно клавиши Alt+F11, чтобы открыть окно Microsoft Visual Basic для приложений.
2. Выберите Вставка > Модуль и вставьте приведённый ниже код VBA в новое окно Модуль.
VBA: Удаление всех дубликатов с сохранением одного экземпляра
Sub RemoveAllDeplicateButOne()
Dim LR As Long: LR = Range("A" & Rows.Count).End(xlUp).Row
ActiveSheet.Range("A1:A" & LR).RemoveDuplicates Columns:=1, Header:=Name
End Sub3. Нажмите клавишу F5 или выберите Выполнить, чтобы запустить макрос. После этого дубликаты в списке столбца A будут удалены, оставив по одному экземпляру.
Совет: В приведённом выше коде VBA буква A обозначает столбец A, а диапазон A1:A — список данных. При необходимости вы можете изменить эти параметры.
Удаление всех дубликатов с сохранением только одного с помощью Kutools для Excel
В надстройке Kutools для Excel есть мощная утилита под названием Выбрать дубликаты/уникальные ячейки, которая позволяет быстро выделить или подсветить все дубликаты, кроме первого, а затем — удалить их.
После бесплатной установкиKutools для Excel выполните следующие действия:
1. Выделите диапазон данных и нажмите Kutools > Выделить > Выбрать дубликаты/уникальные ячейки. См. снимок экрана:
2. В появившемся диалоговом окне установите флажок Дубликаты (исключая первое совпадение) и нажмите ОК. См. снимок экрана:
3. Затем появится диалоговое окно с напоминанием о количестве выделенных ячеек. Просто нажмите ОК, чтобы закрыть его. См. снимок экрана:
4. Все дубликаты, кроме первого, будут выделены. Нажмите клавишу Delete, чтобы удалить их.
Совет:Вы также можете удалить все дубликаты, оставив один, с помощью функции Выбрать дубликаты/уникальные ячейкиследующим образом:
Выделите все уникальные значения, включая первые экземпляры дубликатов, скопируйте их с помощью Ctrl + C и вставьте в другое место с помощью Ctrl + V.
Демонстрация: Удаление всех дубликатов с сохранением только одного
Объединение всех Дублирующая строка и сохранение данных с помощью Kutools для Excel
Если у вас есть данные и вы хотите объединить дублирующиеся строки, сохранив соответствующую информацию, как показано на снимке экрана ниже, воспользуйтесь функцией Kutools для Excel — Расширенное объединение строк.
После бесплатной установкиKutools для Excel выполните следующие действия:
1. Выделите данные и нажмите Kutools > Объединить и разделить > Расширенное объединение строк. См. снимок экрана:
2. В диалоговом окне Объединить строки на основе столбца выберите столбец, из которого нужно удалить дубликаты, и нажмите Ключевой столбец, чтобы назначить его ключевым. См. снимок экрана:
3. Затем выберите столбец, данные из которого нужно сохранить, нажмите Объединить и выберите нужный разделитель из списка. См. снимок экрана:
4. Нажмите ОК, и дублирующие строки будут объединены с сохранением соответствующих данных.
Демонстрация: Объединение дубликатов с сохранением смежных данных
Связанные статьи:
- Как объединить несколько ячеек, содержащих ведущие нули, в одну ячейку в Excel?
- Как сгенерировать случайное число в Excel без дубликатов?
Лучшие инструменты повышения продуктивности в Office
Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…
Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу
- Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
- Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!
Все надстройки Kutools — один установщик
Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.
- Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
- Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
- Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
- 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек