KutoolsforOffice — Одно решение — пять мощных инструментов.Меньше усилий — больше результата.

Как скопировать столбец и вставить только уникальные значения в Excel?

АвторSiluviaДата изменения

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

Вставка только уникальных записей из списка с помощью функции расширенного фильтра

Вставка только уникальных записей из списка с помощью Kutools для Excel

Вставка только уникальных записей с использованием функции UNIQUE в Excel

Вставка только уникальных записей с помощью макроса VBA


Вставка только уникальных записей из списка с помощью функции расширенного фильтра

Когда вам нужно скопировать и вставить только уникальные записи из столбца в Excel — особенно если список содержит множество дубликатов, — надёжным решением станет встроенная функция Расширенный фильтр.

1. Сначала выделите столбец со значениями, которые нужно скопировать без дубликатов. Затем перейдите на вкладку Данные и нажмите Расширенный в группе Сортировка и фильтр. См. снимок экрана:

снимок экрана с открытым диалоговым окном расширенного фильтра

2. В диалоговом окне Расширенный фильтр выполните следующие действия:

  • Выберите переключатель Скопировать в другое место в разделе Действие — это гарантирует, что результаты появятся в другом месте, не затрагивая исходные данные.
  • В поле Скопировать в щелкните кнопку кнопка выбора места вставки и выберите пустую ячейку, куда нужно поместить уникальные значения. Выбор пустого места назначения поможет избежать случайной перезаписи существующих данных.
  • Установите флажок Только уникальные записи, чтобы указать Excel исключить дубликаты из полученных результатов.
  • Нажмите кнопку ОК, чтобы завершить операцию. См. снимок экрана:

снимок экрана с настройкой диалогового окна расширенного фильтра

После выполнения этих шагов в указанной пустой ячейке появится список, содержащий только уникальные значения из исходного столбца. Обратите внимание: отфильтрованный список не сохраняет исходный порядок, а результат не обновляется автоматически при изменении исходных данных. Если вы внесёте изменения в исходный список, эти шаги придётся повторить.

снимок экрана с извлечением уникальных значений

Советы:

  • Если ваши исходные данные содержат заголовок, обязательно включите его в выделение для точной фильтрации.
  • Если появляется ошибка «Диапазон списка должен быть одной строкой или одним столбцом», убедитесь, что выбранный вами диапазон согласован.
  • Этот метод отлично подходит для однократных извлечений, но менее удобен для списков, которые часто обновляются, поскольку результат фильтрации остаётся статичным.

Вставка только уникальных записей из списка с помощью Kutools для Excel

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

Kutools для Excel: включает более чем 300 удобных надстроек для Excel, бесплатная пробная версия без ограничений на 30 дней.Получите сейчас для бесплатной 30-дневной пробной версии

1. Сначала выделите список, из которого нужно извлечь и вставить только уникальные значения. Затем перейдите в меню Kutools > Выделить > Выбрать дубликаты/уникальные ячейки.

2. В появившемся диалоговом окне выберите Уникальные значения (включая первый дубликат). Эта опция гарантирует, что первые вхождения дублирующихся значений будут сохранены как уникальные, а последующие повторения — проигнорированы. Нажмите ОК. В следующем диалоговом окне подтверждения снова нажмите ОК. См. снимок экрана:

снимок экрана с настройкой диалогового окна «Выбор дублирующих и уникальных ячеек» Kutools

Примечание: Если вы хотите извлечь только значения, которые никогда не повторяются в списке (истинно уникальные), выберите опцию Уникальные значения. Это идеальный способ найти элементы, встречающиеся всего один раз, и полностью исключить все дубликаты.

3. После подтверждения Kutools автоматически выделит все найденные уникальные значения в исходном списке. Затем вы можете скопировать их, нажав Ctrl+C, и вставить результаты в новый столбец или лист с помощью Ctrl+V.

снимок экрана с вставкой только уникальных значений

Важные напоминания:

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

Kutools для Excel— раскройте весь потенциал Excel с помощью более чем 300 незаменимых инструментов, которые ускоряют и упрощают вашу работу, а также воспользуйтесь возможностями ИИ для более разумной обработки данных и повышения продуктивности.Получить сейчас


Вставка только уникальных записей с использованием функции UNIQUE в Excel

Для пользователей Excel 365, Excel 2021 и более поздних версий функция UNIQUE предлагает динамичный и высокоэффективный способ извлечения уникальных значений из столбца. Этот метод идеально подходит, если вы хотите, чтобы результаты автоматически обновлялись при изменении исходных данных — например, в панелях мониторинга или регулярно обновляемых сводных таблицах.

1. В первой ячейке целевого столбца (например, в ячейке)B1) введите следующую формулу:

=UNIQUE(A1:A100)

Здесь замените A1:A100 на диапазон ваших фактических данных. При необходимости вы можете легко адаптировать его под свой список.

2. Нажмите клавишу Enter. Excel автоматически заполнит все уникальные значения из исходного столбца в ячейках под формулой. Результат будет обновляться автоматически при изменении исходных данных.

Совет: если вы хотите извлечь уникальные значения из строк вместо столбцов (или наоборот), убедитесь, что диапазон в формуле указан правильно.

  • Преимущества: динамическое обновление, простота в использовании и отсутствие необходимости вручную настраивать фильтрацию или копировать данные.
  • Недостатки: функция доступна только в Excel 365, Excel 2021 и более поздних версиях. Результат автоматически перезапишет все данные, расположенные ниже ячейки с формулой, поэтому заранее продумайте размещение, чтобы избежать потери информации.

Если вы хотите получить статическую копию уникальных значений после извлечения — например, для передачи или дальнейшего редактирования, — просто скопируйте полученный список и воспользуйтесь командой Вставить специально > Значения в новом месте.


Вставка только уникальных записей из столбца с помощью кода VBA

Если вам часто приходится извлекать и копировать уникальные записи или вы стремитесь автоматизировать эту задачу для объёмных наборов данных, простой макрос на VBA поможет быстро завершить процесс. Такой подход идеален для пользователей, знакомых с основами программирования, а также в ситуациях, когда ручная фильтрация заняла бы слишком много времени.

1. Щелкните Средства разработчика > Visual Basic. Откроется окно редактора Microsoft Visual Basic для приложений. В редакторе выберите Вставка > Модуль и введите в модуль следующий код:

Sub ExtractUniqueRecords()
    Dim rng As Range
    Dim dest As Range
    Dim uniqueCol As Collection
    Dim cell As Range
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set rng = Application.Selection
    Set rng = Application.InputBox("Select the source range:", xTitleId, rng.Address, Type:=8)
    
    Set dest = Application.InputBox("Select the destination (top cell):", xTitleId, "", Type:=8)
    
    Set uniqueCol = New Collection
    
    For Each cell In rng
        If Len(cell.Value) > 0 Then
            uniqueCol.Add cell.Value, CStr(cell.Value)
        End If
    Next
    
    For i = 1 To uniqueCol.Count
        dest.Offset(i - 1, 0).Value = uniqueCol(i)
    Next
End Sub

2. Нажмите кнопку Кнопка запуска(или клавишу)F5), чтобы запустить макрос. Вам будет предложено сначала выбрать исходный диапазон, из которого нужно извлечь уникальные значения, а затем указать ячейку назначения — именно туда будут вставлены результаты. После этого макрос автоматически заполнит столбец назначения уникальными записями.

Советы и устранение неполадок:

  • Перед запуском макроса убедитесь, что выбран правильный исходный диапазон, и проверьте, достаточно ли свободного места в диапазоне назначения для размещения результатов.
  • Этот код VBA пропускает пустые ячейки и обрабатывает текст с числами одинаково. Если ваши данные разнотипны, обязательно проверьте точность полученных результатов.
  • Если появляется ошибка «индекс за пределами диапазона», убедитесь, что выделение соответствует ожидаемому формату: один столбец без объединённых ячеек.

Автоматизация с помощью VBA идеально подходит для пакетной обработки, а назначение этого макроса кнопке сделает его многократное использование ещё удобнее.

Дополнительные рекомендации и устранение неполадок

  • Всегда создавайте резервную копию важных данных перед выполнением операций копирования и вставки, которые могут перезаписать ячейки.
  • Используя решения на основе формул, особенно функцию UNIQUE, обязательно учитывайте совместимость с версиями Excel.
  • Комбинирование методов — например, сначала использование функции UNIQUE, а затем инструментов Kutools для дополнительного форматирования — позволяет эффективно оптимизировать рабочий процесс при решении сложных задач.
  • Иногда на результаты могут повлиять проблемы с форматированием (скрытые строки или столбцы, объединённые ячейки) — всегда проверяйте полноту извлечённого списка.
  • Если вы столкнулись с неожиданными результатами или системными ошибками, перезапустите Excel, чтобы устранить временные сбои, и повторно выполните шаги выделения диапазона.

Связанная статья:


Лучшие инструменты повышения продуктивности в Office

🤖KUTOOLS AI Помощник: Преобразуйте Анализ данных с помощью:Интеллектуального выполнения   |  Генерации кода|  Создания пользовательские формулы  |  Анализа данных и построения диаграмм|  Вызова Расширенные функции
Популярные функции:Поиск, выделение или Отметить дубликаты   |  Удалить пустые строки   |  Объединить столбцы или ячеек без потери данных   |  Округление без использования формул
Супер ПОИСК:VLookup по нескольким критериям  |  VLookup по нескольким значениям  |   VLookup по нескольким листам   |   Распознавание нечетких соответствий
Расширенный раскрывающийся список:Быстрое создание выпадающего списка   |  Зависимый выпадающий список   |  Выпадающий список с множественным выбором
Управление столбцами:Добавление заданного количества столбцов|Перемещение столбцов|Переключение видимости скрытых столбцов|Сравнение диапазонов и столбцов
Избранные функции:Сетка фокусировки   |  Просмотр дизайна   |Улучшенная строка формулы   | Управление рабочими книгами и листами   |  Библиотека ресурсов(автотекст)|  Выбор даты   |  Объединить листы  |  Шифрование/Расшифровать ячейки   | Отправка писем по списку   |  Супер фильтр   |   Специальный фильтр(Фильтр ячеек с жирным шрифтом/курсив/зачёркивание…) …
Лучшие наборы инструментов 15:12 Текстовыеинструменты(Добавить текст,Удалить определенные символы, …)|   50+Типыдиаграмм(Диаграмма Ганта, …)|   40+ Практические формулы(Рассчитать возраст на основе даты рождения, …)|   19 Инструментывставки(Вставить QR-код,Вставка изображения по пути, …)|   12 Инструментыпреобразования(Преобразовать в слова,Конвертация валют, …)|   7 Объединить и разделитьИнструменты(Расширенное объединение строк,Разделить ячейки, …)|… и многое другое
Используйте Kutools на предпочитаемом языке — поддержка английского, испанского, немецкого, французского, китайского и ещё 40+ языков!

Раскройте весь потенциал 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.

ExcelWordOutlookTabsPowerPoint
  • Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
  • Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
  • Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
  • 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
  • Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек