Как удалить Дублирующая строка в Excel: 3 простых способа

Дублирующиеся строки часто появляются при копировании данных из разных листов, импорте отчётов из внешних систем или объединении нескольких списков в Excel. Если их не удалить, повторяющиеся записи могут исказить итоги, сводные таблицы, отчёты и результаты анализа данных.

В этом руководстве вы узнаете три практических способа удаления дублирующих строк в Excel: с помощью встроенной функции Excel Удалить дубликаты, с использованием Kutools для Excel для выделения и проверки дублирующих строк перед их удалением, а также с помощью VBA для автоматизации задачи.

• Зачем удалять Дублирующая строка в Excel
• Способ 1: Удаление Дублирующая строка с помощью Excel Удалить дубликаты
• Способ 2: Выделение, подсветка и удаление Дублирующая строка с помощью Kutools 👍(Безопасно и наглядно)
• Способ 3: Удаление Дублирующая строка с помощью VBA
• Какой способ выбрать
• Часто задаваемые вопросы

Зачем удалять Дублирующая строка в Excel

Дублирующая строка означает, что одна и та же запись встречается на листе более одного раза. Например, в списке продаж могут повторяться один и тот же заказ, клиент, товар и сумма.

В приведённом выше примере записи для ID заказа 1001 и ID заказа 1002 встречаются дважды. Удаление дублирующих строк помогает сохранить только одну чистую копию каждой записи.

Способ 1: Удаление Дублирующая строка с помощью Excel Удалить дубликаты

В Excel есть встроенная функция Удалить дубликаты, которая быстро удаляет повторяющиеся строки из выделенного диапазона. Этот способ идеально подходит, когда вы хотите немедленно избавиться от дубликатов, оставив только первое вхождение каждой записи.

1. Выберите диапазон данных, содержащий дублирующиеся строки.
2. Перейдите на вкладку Данные и нажмите Удалить дубликаты в группе Работа с данными.
   
3. В диалоговом окне Удалить дубликатызадайте следующие параметры:
   1. ① Установите флажок Включить заголовки, если ваш выделенный диапазон содержит заголовки.
   2. ② Выберите столбцы, используемые для Отметить дубликаты.
      • Если вы выберете все столбцы, Excel удалит только полностью идентичные строки.
      • Если вы выберете только один или несколько столбцов, Excel будет считать дубликатами строки с одинаковыми значениями в выбранных столбцах.
      В данном примере мы выбираем все столбцы, чтобы удалять строки только тогда, когда вся строка дублируется.
   3. ③ Нажмите ОК.
      
4. Excel покажет сообщение с количеством удалённых дублирующихся значений и оставшихся уникальных значений. Нажмите ОК, чтобы закрыть его.
   

Результат: Excel удаляет дублирующиеся строки из выбранного диапазона и сохраняет первое вхождение каждой повторяющейся записи.

Способ 2: Выделение, подсветка и удаление Дублирующая строка с помощью Kutools

Если вы хотите проверить дублирующиеся строки перед их удалением, Kutools для Excel предлагает более простой и безопасный способ. С помощью функции Выбрать дубликаты/уникальные ячейки вы можете быстро выделить дублирующиеся строки, при необходимости подсветить их, проверить и затем удалить с листа. Этот способ особенно полезен, когда вы хотите сохранить первое вхождение и удалить только лишние дублирующиеся строки.

1. Выберите диапазон, в котором нужно найти и удалить Дублирующая строка.
2. Нажмите Kutools > Выделить > Выбрать дубликаты/уникальные ячейки.
   
3. В диалоговом окне Выбрать дубликаты/уникальные ячейкивыполните следующие действия:
   1. ① Выберите Каждую строку в разделе На основе.
   2. ② В разделе Правиловыберите Дубликаты (исключая первое совпадение).
      • Дубликаты (исключая первое совпадение): выбирает только лишние дублирующие строки и оставляет одну копию.
      • Дубликаты (включая первое совпадение): выбирает все строки в каждой группе дубликатов. Если вы их удалите, все дублирующиеся записи в этой группе будут удалены.
   3. ③ Необязательно: установите флажок Заполнить цвет фона или Заполнить цвет шрифта, если хотите выделить выбранные дублирующиеся строки перед их удалением.
   4. ④ Нажмите ОК.
      
4. Появится сообщение с указанием количества выделенных строк. Нажмите ОК.
   
5. Щёлкните правой кнопкой мыши по одной из выделенных строк и выберите Удалить.

Результат: Все дублирующиеся строки, кроме первого вхождения, выделяются и удаляются. На листе остаётся одна копия каждой повторяющейся записи. Если вы применили Цвет заполнения или Цвет шрифтаДублирующиеся строки подсвечиваются перед удалением, что упрощает их проверку.

Способ 3: Удаление Дублирующая строка с помощью VBA

Этот код VBA проверяет Дублирующая строка по всем столбцам в Выберите диапазон. Он сохраняет первое вхождение и удаляет последующие Дублирующая строка.

1. Нажмите Alt + F11, чтобы открыть окно Microsoft Visual Basic для приложений.
2. Нажмите Вставка > Модуль.
3. Скопируйте и вставьте код VBA в окно модуля.

    Sub RemoveDuplicateRows_KeepFirst()
   'Updated by Extendoffice 2026/5/22
       Dim rng As Range
       Dim hasHeaders As VbMsgBoxResult
       Dim firstDataRow As Long
       Dim r As Long, c As Long
       Dim key As String
       Dim seen As Collection
       Dim rowsToDelete As Range
       Dim cellValue As Variant
       
       On Error Resume Next
       Set rng = Application.InputBox("Select the range to remove duplicate rows:", "Remove Duplicate Rows", Type:=8)
       On Error GoTo 0
       
       If rng Is Nothing Then Exit Sub
       
       hasHeaders = MsgBox("Does the selected range include headers?", vbYesNoCancel + vbQuestion, "Header Option")
       If hasHeaders = vbCancel Then Exit Sub
       
       If hasHeaders = vbYes Then
           firstDataRow = 2
       Else
           firstDataRow = 1
       End If
       
       Set seen = New Collection
       
       Application.ScreenUpdating = False
       
       For r = firstDataRow To rng.Rows.Count
           key = ""
           
           For c = 1 To rng.Columns.Count
               cellValue = rng.Cells(r, c).Value
               
               If IsError(cellValue) Then
                   key = key & "[ERROR]" & CStr(rng.Cells(r, c).Text) & Chr(30)
               Else
                   key = key & CStr(cellValue) & Chr(30)
               End If
           Next c
           
           On Error Resume Next
           seen.Add key, key
           
           If Err.Number <> 0 Then
               If rowsToDelete Is Nothing Then
                   Set rowsToDelete = rng.Rows(r).EntireRow
               Else
                   Set rowsToDelete = Union(rowsToDelete, rng.Rows(r).EntireRow)
               End If
               Err.Clear
           End If
           
           On Error GoTo 0
       Next r
       
       If Not rowsToDelete Is Nothing Then
           rowsToDelete.Delete
           MsgBox "Duplicate rows have been removed.", vbInformation
       Else
           MsgBox "No duplicate rows were found.", vbInformation
       End If
       
       Application.ScreenUpdating = True
   End Sub
   

4. Нажмите F5 или кнопку Выполнить в редакторе VBA, чтобы запустить код.
5. В появившемся окне выберите диапазон, из которого нужно удалить дублирующиеся строки, и нажмите ОК.
   
6. Когда появится запрос о том, содержит ли диапазон заголовки, выберите Да или Нет.
   

Результат: Повторяющиеся строки в диапазоне «Выберите диапазон» удалены, а первое вхождение сохранено.

Какой способ выбрать

Лучший способ зависит от того, нужен ли вам быстрый встроенный инструмент, безопасный визуальный метод для предварительного просмотра дубликатов или решение на основе кода.

Для быстрой очистки отлично подходит встроенная функция Excel Удалить дубликаты. Если вы хотите сначала выделить, подсветить и проверить дублирующиеся строки перед удалением, Kutools для Excel станет более безопасным и наглядным решением. VBA удобен, если вы предпочитаете решение на основе кода.

Часто задаваемые вопросы

Как удалить дублирующиеся строки, оставив только первое вхождение, в Excel?

Вы можете воспользоваться встроенной функцией Excel Удалить дубликаты. Она удаляет повторяющиеся записи, оставляя только первое вхождение. Также можно использовать Kutools для Excel и выбрать Дубликаты (исключая первое совпадение), чтобы выделить только дублирующие строки, следующие после первого вхождения.

Как удалить дублирующиеся строки, основываясь только на одном столбце?

Выберите свой диапазон данных, перейдите на вкладку Данные → Удалить дубликаты и укажите только тот столбец, по которому нужно искать дубликаты. Excel будет считать дубликатами строки с одинаковыми значениями в этом столбце и оставит первое вхождение.

Как найти Дублирующая строка без их удаления?

Воспользуйтесь функцией Выбрать дубликаты/уникальные ячейки из Kutools для Excel: сначала выберите «Дублирующая строка», а затем просмотрите, выделите, скопируйте или удалите их.

В чём разница между «Дубликаты (исключая первое совпадение)» и «Дубликаты (включая первое совпадение)»?

Дубликаты (исключая первое совпадение) выбирают только повторяющиеся вхождения после первой записи. Это полезно, когда вы хотите оставить одну копию и удалить лишние дубликаты.

Дубликаты (включая первое совпадение) выбирают все строки в каждой группе дубликатов, включая первое вхождение. Это удобно, если вы хотите выявить все записи, входящие в группы дубликатов.

Можно ли выделить Дублирующая строка перед их удалением?

Да. С помощью Kutools для Excel вы можете выбрать Дублирующая строка и одновременно применить Цвет заполнения или Цвет шрифта. Это упрощает проверку дублирующихся записей перед их удалением.

Может ли Excel удалять дубликаты с учётом регистра (например, «Дублирующая строка» и «дублирующая строка»)?

Встроенная функция Excel «Удалить дубликаты» не учитывает регистр символов. Если вам важно различать прописные и строчные буквы, воспользуйтесь опцией С учетом регистра в функции Kutools для Excel Выбрать дубликаты/уникальные ячейки.

Заключение

Удаление дублирующихся строк — важный шаг при очистке данных в Excel. Для быстрой очистки отлично подходит встроенная функция Excel Удалить дубликаты. Для более безопасного процесса Kutools для Excel позволяет выбрать и проверить дублирующиеся строки перед их удалением. А для регулярных задач очистки можно использовать автоматизацию с помощью VBA.

Если вы часто работаете с большими наборами данных или тщательно проверяете дубликаты перед удалением, метод Kutools может Экономия времени и снизить риск случайного удаления важных записей.