Как найти повторяющиеся данные в excel на разных листах - Word и Excel

Как найти повторяющиеся значения в таблице Excel

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

Работая с большими наборами данных в Excel или объединяя несколько небольших электронных таблиц в более крупные, вы можете столкнуться с большим числом одинаковых строк.

И сегодня я хотел бы поделиться несколькими быстрыми и эффективными методами выявления дубликатов в одном списке. Эти решения работают во всех версиях Excel 2016, Excel 2013, 2010 и ниже. Вот о чём мы поговорим:

Поиск повторяющихся значений включая первые вхождения
Поиск дубликатов без первых вхождений
Определяем дубликаты с учетом регистра
Как извлечь дубликаты из диапазона ячеек
Как обнаружить одинаковые строки в таблице данных
Использование встроенных фильтров Excel
Применение условного форматирования
Поиск совпадений при помощи встроенной команды «Найти»
Определяем дубликаты при помощи сводной таблицы
Duplicate Remover — быстрый и эффективный способ найти дубликаты

Самой простой в использовании и вместе с тем эффективной в данном случае будет функция СЧЁТЕСЛИ (COUNTIF). С помощью одной только неё можно определить не только неуникальные позиции, но и их первые появления в столбце. Рассмотрим разницу на примерах.

Поиск повторяющихся значений включая первые вхождения.

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

=СЧЁТЕСЛИ(A:A; A2)>1

Где А2 — первая ячейка из области для поиска.

Просто введите это выражение в любую ячейку и протяните вниз вдоль всей колонки, которую нужно проверить на дубликаты.

Как вы могли заметить на скриншоте выше, формула возвращает ИСТИНА, если имеются совпадения. А для встречающихся только 1 раз значений она показывает ЛОЖЬ.

Подсказка! Если вы ищите повторы в определенной области, а не во всей колонке, обозначьте нужный диапазон и “зафиксируйте” его знаками $. Это значительно ускорит вычисления. Например, если вы ищете в A2:A8, используйте

=СЧЕТЕСЛИ($A$2:$A$8, A2)>1

Если вас путает ИСТИНА и ЛОЖЬ в статусной колонке и вы не хотите держать в уме, что из них означает повторяющееся, а что — уникальное, заверните свою СЧЕТЕСЛИ в функцию ЕСЛИ и укажите любое слово, которое должно соответствовать дубликатам и уникальным:

=ЕСЛИ(СЧЁТЕСЛИ($A$2:$A$17; A2)>1;»Дубликат»;»Уникальное»)

Если же вам нужно, чтобы формула указывала только на дубли, замените «Уникальное» на пустоту («»):

=ЕСЛИ(СЧЁТЕСЛИ($A$2:$A$17; A2)>1;»Дубликат»;»»)

В этом случае Эксель отметит только неуникальные записи, оставляя пустую ячейку напротив уникальных.

Поиск неуникальных значений без учета первых вхождений

Вы наверняка обратили внимание, что в примерах выше дубликатами обозначаются абсолютно все найденные совпадения. Но зачастую задача заключается в поиске только повторов, оставляя первые вхождения нетронутыми. То есть, когда что-то встречается в первый раз, оно однозначно еще не может быть дубликатом.

Если вам нужно указать только совпадения, давайте немного изменим:

=ЕСЛИ(СЧЁТЕСЛИ($A$2:$A2; A2)>1;»Дубликат»;»»)

На скриншоте ниже вы видите эту формулу в деле.

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

Чувствительный к регистру поиск дубликатов

Хочу обратить ваше внимание на то, что хоть формулы выше и находят 100%-дубликаты, есть один тонкий момент — они не чувствительны к регистру. Быть может, для вас это не принципиально. Но если в ваших данных абв, Абв и АБВ — это три разных параметра – то этот пример для вас.

Как вы могли уже догадаться, выражения, использованные нами ранее, с такой задачей не справятся. Здесь нужно выполнить более тонкий поиск, с чем нам поможет следующая функция массива:

{=ЕСЛИ(СУММ((—СОВПАД($A$2:$A$17;A2)))<=1;»»;»Дубликат»)}

Не забывайте, что формулы массива вводятся комбиинацией Ctrl + Shift + Enter.

Если вернуться к содержанию, то здесь используется функция СОВПАД для сравнения целевой ячейки со всеми остальными ячейками с выбранной области. Результат возвращается в виде ИСТИНА (совпадение) или ЛОЖЬ (не совпадение), которые затем преобразуются в массив из 1 и 0 при помощи оператора (—).

После этого, функция СУММ складывает эти числа. И если полученный результат больше 1, функция ЕСЛИ сообщает о найденном дубликате.

Если вы взглянете на следующий скриншот, вы убедитесь, что поиск действительно учитывает регистр при обнаружении дубликатов:

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

Как извлечь дубликаты из диапазона.

Формулы, которые мы описывали выше, позволяют находить дубликаты в определенном столбце. Но часто речь идет о нескольких столбцах, то есть о диапазоне данных.

Рассмотрим это на примере числовой матрицы. К сожалению, с символьными значениями этот метод не работает.

При помощи формулы массива

{=ИНДЕКС(НАИМЕНЬШИЙ(ЕСЛИ(СЧЁТЕСЛИ($A$2:$E$11;$A$2:$E$11)>1;$A$2:$E$11);СТРОКА($1:$100)); НАИМЕНЬШИЙ(ЕСЛИОШИБКА(ЕСЛИ(ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ( СЧЁТЕСЛИ($A$2:$E$11;$A$2:$E$11)>1;$A$2:$E$11);СТРОКА($1:$100)); НАИМЕНЬШИЙ(ЕСЛИ(СЧЁТЕСЛИ($A$2:$E$11;$A$2:$E$11)>1;$A$2:$E$11); СТРОКА($1:$100));0)=СТРОКА($1:$100);СТРОКА($1:$100));»»);СТРОКА()-1))}

вы можете получить упорядоченный по возрастанию список дубликатов. Для этого введите это выражение в нужную ячейку и нажмите Ctrl+Alt+Enter.

Затем протащите маркер заполнения вниз на сколько это необходимо.

Чтобы убрать сообщения об ошибке, когда дублирующиеся значения закончатся, можно использовать функцию ЕСЛИОШИБКА:

=ЕСЛИОШИБКА(ИНДЕКС(НАИМЕНЬШИЙ(ЕСЛИ(СЧЁТЕСЛИ($A$2:$E$11;$A$2:$E$11)>1;$A$2:$E$11); СТРОКА($1:$100));НАИМЕНЬШИЙ(ЕСЛИОШИБКА(ЕСЛИ(ПОИСКПОЗ( НАИМЕНЬШИЙ(ЕСЛИ(СЧЁТЕСЛИ($A$2:$E$11;$A$2:$E$11)>1;$A$2:$E$11); СТРОКА($1:$100));НАИМЕНЬШИЙ(ЕСЛИ(СЧЁТЕСЛИ($A$2:$E$11;$A$2:$E$11)>1;$A$2:$E$11); СТРОКА($1:$100));0)=СТРОКА($1:$100);СТРОКА($1:$100));»»);СТРОКА()-1));»»)

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

Поэтому если вам нужно разместить его, к примеру, в ячейке K4, то выражение СТРОКА()-1 в конце замените на СТРОКА()-3.

Обнаружение повторяющихся строк

Мы рассмотрели, как обнаружить одинаковые данные в отдельных ячейках. А если нужно искать дубликаты-строки?

Есть один метод, которым можно воспользоваться, если вам нужно просто выделить одинаковые строки, но не удалять их.

Итак, имеются данные о товарах и заказчиках.

Создадим справа от наших данных формулу, объединяющую содержание всех расположенных слева от нее ячеек.

Предположим, что данные хранятся в столбцах А:C. Запишем в ячейку D2:

=A2&B2&C2

Добавим следующую формулу в ячейку E2. Она отобразит, сколько раз встречается значение, полученное нами в столбце D:

=СЧЁТЕСЛИ(D:D;D2)

Скопируем вниз для всех строк данных.

В столбце E отображается количество появлений этой строки в столбце D. Неповторяющимся строкам будет соответствовать значение 1. Повторам строкам соответствует значение больше 1, указывающее на то, сколько раз такая строка была найдена.

Если вас не интересует определенный столбец, просто не включайте его в выражение, находящееся в D. Например, если вам хочется обнаружить совпадающие строки, не учитывая при этом значение Заказчик, уберите из объединяющей формулы упоминание о ячейке С2.

Обнаруживаем одинаковые ячейки при помощи встроенных фильтров Excel.

Теперь рассмотрим, как можно обойтись без формул при поиске дубликатов в таблице. Быть может, кому-то этот метод покажется более удобным, нежели написание выражений Excel.

Организовав свои данные в виде таблицы, вы можете применять к ним различные фильтры. Фильтр в таблице вы можете установить по одному либо по нескольким столбцам. Давайте рассмотрим на примере.

В первую очередь советую отформатировать наши данные как «умную» таблицу. Напомню: Меню Главная – Форматировать как таблицу.

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

Вы можете убрать галочку с пункта «Выделить все», а затем отметить один или несколько нужных элементов. Excel покажет только те строки, которые содержат выбранные значения. Так можно обнаружить дубликаты, если они есть. И все готово для их быстрого удаления.

Но при этом вы видите дубли только по отфильтрованному. Если данных много, то искать таким способом последовательного перебора будет несколько утомительно. Ведь слишком много раз нужно будет устанавливать и менять фильтр.

Используем условное форматирование.

Выделение цветом по условию – весьма важный инструмент Excel, о котором достаточно подробно мы рассказывали.

Сейчас я покажу, как можно в Экселе найти дубли ячеек, просто их выделив цветом.

Как показано на рисунке ниже, выбираем Правила выделения ячеек – Повторяющиеся. Неуникальные данные будут подсвечены цветом.

Но здесь мы не можем исключить первые появления – подсвечивается всё.

Но эту проблему можно решить, использовав формулу условного форматирования.

=СЧЁТЕСЛИ($B$2:$B2; B2)>1

Результат работы формулы выденения повторяющихся значений вы видите выше. Они выделены зелёным цветом.

Чтобы освежить память, можете руководствоваться нашим материалом «Как изменить цвет ячейки в зависимости от значения».

Поиск совпадений при помощи команды «Найти».

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

Зайдите на вкладку Главная и кликните «Найти и выделить». Откроется диалоговое окно, в котором можно ввести что угодно для поиска в таблице. Чтобы избежать опечаток, можете скопировать искомое прямо из списка данных.

Затем нажимаем «Найти все», и видим все найденные дубликаты и места их расположения, как на рисунке чуть ниже.

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

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

Как применить сводную таблицу для поиска дубликатов.

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

Для более опытных – сразу переходим к сути вопроса.

Создаем новый макет сводной таблицы. А затем в качестве строк и значений используем одно и то же поле. В нашем случае – «Товар». Поскольку название товара – это текст, то для подсчета таких значений Excel по умолчанию использует функцию СЧЕТ, то есть подсчитывает количество. А нам это и нужно. Если будет больше 1, значит, имеются дубликаты.

Вы наблюдаете на скриншоте выше, что несколько товаров дублируются. И что нам это дает? А далее мы просто можем щелкнуть мышкой на любой из цифр, и на новом листе Excel покажет нам, как получилась эта цифра.

К примеру, откуда взялись 3 дубликата Sprite? Щелкаем на цифре 3, и видим такую картину:

Думаю, этот метод вполне можно использовать. Что приятно – никаких формул не требуется.

Duplicate Remover — быстрый и эффективный способ найти дубликаты в Excel

Теперь, когда вы знаете, как использовать формулы для поиска повторяющихся значений в Excel, позвольте мне продемонстрировать вам еще один быстрый, эффективный и без всяких формул способ: инструмент Duplicate Remover для Excel.

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

Как найти повторяющиеся строки в Excel за 2 быстрых шага

Сначала посмотрим в работе наиболее простой инструмент — быстрый поиск дубликатов Quick Dedupe. Используем уже знакомую нам таблицу, в которой мы выше искали дубликаты при помощи формул:

Как видите, в таблице несколько столбцов. Чтобы найти повторяющиеся записи в этих трех столбцах, просто выполните следующие действия:

Выберите любую ячейку в таблице и нажмите кнопку Quick Dedupe на ленте Excel. После установки пакета Ultimate Suite для Excel вы найдете её на вкладке Ablebits Data в группе Dedupe. Это наиболее простой инструмент для поиска дубликатов.

Интеллектуальная надстройка возьмет всю таблицу и попросит вас указать следующие две вещи:
- Выберите столбцы для проверки дубликатов (в данном примере это все 3 столбца – категория, товар и заказчик).
- Выберите действие, которое нужно выполнить с дубликатами. Поскольку наша цель — выявить повторяющиеся строки, я выбрал «Выделить цветом».

Помимо выделения цветом, вам доступен ряд других опций:

Удалить дубликаты
Выбрать дубликаты
Указать их в столбце статуса
Копировать дубликаты на новый лист
Переместить на новый лист

Нажмите кнопку ОК и подождите несколько секунд. Готово! И никаких формул 😊.

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

Если вам нужны дополнительные возможности для работы с дубликатами и уникальными значениями, используйте мастер удаления дубликатов Duplicate Remover, который может найти дубликаты с первыми вхождениями или без них, а также уникальные значения. Подробные инструкции приведены ниже.

Мастер удаления дубликатов — больше возможностей для поиска дубликатов в Excel.

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

Выберите любую ячейку в таблице и нажмите кнопку Duplicate Remover на вкладке Ablebits Data.

Вам предложены 4 варианта проверки дубликатов в вашем листе Excel:
- Дубликаты без первых вхождений повторяющихся записей.
- Дубликаты с 1-м вхождением.
- Уникальные записи.
- Уникальные значения и 1-е повторяющиеся вхождения.

В этом примере выберем второй вариант, т.е. Дубликаты + 1-е вхождения:

Теперь выберите столбцы, в которых вы хотите проверить дубликаты. Как и в предыдущем примере, мы возьмём первые 3 столбца:

Наконец, выберите действие, которое вы хотите выполнить с дубликатами. Как и в случае с инструментом быстрого поиска дубликатов, мастер Duplicate Remover может идентифицировать, выбирать, выделять, удалять, копировать или перемещать повторяющиеся данные.

Поскольку цель этого примера – продемонстрировать различные способы определения дубликатов в Excel, давайте отметим параметр «Выделить цветом» (Highlight with color) и нажмите Готово.
Мастеру Duplicate Remover требуется всего лишь несколько секунд, чтобы проверить вашу таблицу и показать результат:

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

Никаких формул, никакого стресса, никаких ошибок — всегда быстрые и безупречные результаты

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

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

Источник

Как найти повторяющиеся или уникальные значения в двух столбцах на двух листах?

Может быть, сравнить два диапазона на одном листе и выяснить, что повторяющиеся или уникальные значения легко для большинства из вас, но если два диапазона находятся на двух разных листах, как вы можете быстро найти повторяющиеся и уникальные значения в этих двух диапазонах ? В этом уроке вы найдете несколько быстрых решений.

Сравните два одинаковых столбца заголовка в двух электронных таблицах с формулой в Excel

Сравните два диапазона в двух электронных таблицах с VBA

Сравните два диапазона в двух электронных таблицах с Kutools for Excel

Сравните два одинаковых столбца заголовка в двух электронных таблицах с формулой в Excel

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

1. Набрав эту формулу = СЧЁТЕСЛИ (Лист1! $ A: $ A; A1) в пустой ячейке, которая находится рядом с диапазоном на листе 3. См. снимок экрана:

2. Нажмите Enter на клавиатуре, а затем перетащите маркер заполнения, чтобы заполнить диапазон, который вы хотите сравнить с диапазоном на Листе 1. (Номер Ноль означает повторяющиеся значения в двух диапазонах, а Номер 1 означает уникальные значения в Листе 3, но не в Листе 1)

Советы:

1. Эта формула может сравнивать только два столбца с одинаковым заголовком в двух электронных таблицах.

2. Если вы хотите найти уникальные значения в Sheet1, но не в Sheet3, вам необходимо ввести приведенную выше формулу =СЧЁТЕСЛИ (Лист3! $ A: $ A; A1) в Sheet1.

Сравните два диапазона в двух электронных таблицах с VBA

1. Держать ALT и нажмите F11 на клавиатуре, чтобы открыть Microsoft Visual Basic для приложений окно.

2. Нажмите Вставить > Модули, и скопируйте VBA в модуль.

VBA: сравнить два диапазона в двух таблицах

Sub CompareRanges () 'Обновление 20130815 Dim WorkRng1 как диапазон, WorkRng2 как диапазон, Rng1 как диапазон, Rng2 как диапазон xTitleId = "KutoolsforExcel" Установить WorkRng1 = Application.InputBox ("Range A:", xTitleId, "", Type: = 8 ) Установите WorkRng2 = Application.InputBox ("Range B:", xTitleId, Type: = 8) Для каждого Rng1 в WorkRng1 rng1Value = Rng1.Value для каждого Rng2 в WorkRng2 Если rng1Value = Rng2.Value Тогда Rng1.Interior.Color = VBA .RGB (255, 0, 0) Выйти за конец, если следующий следующий конец Sub

3. Нажмите Run или нажмите F5 для запуска VBA.

4. На экране отображается диалоговое окно, и вы должны выбрать один диапазон, с которым хотите сравнить. Смотрите скриншот:

5. Нажмите Ok и другое диалоговое окно отображается для выбора второго диапазона. Смотрите скриншот:

6. Нажмите Ok, а повторяющиеся значения как в диапазоне A, так и в диапазоне B выделяются красным фоном в диапазоне A. См. снимок экрана:

Советы: с помощью этого VBA вы можете сравнивать два диапазона как на одном, так и на разных листах.

Сравните два диапазона в двух электронных таблицах с Kutools for Excel

Если формула вам не удобна, а VBA вам сложно, вы можете попробовать Kutools for Excel‘s Сравнить диапазоны функции.

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

Пожалуйста, примените Сравнить диапазоны функция, нажав Кутулс > Сравнить диапазоны. Смотрите скриншот:

Сравните с двумя столбцами на разных листах:

1. Нажмите Кутулс > Сравнить диапазоны, на экране отобразится диалоговое окно. Смотрите скриншот:

2. Укажите диапазоны и правила, сделайте следующее:

Оставьте Сравнить в том же диапазоне снимите флажок и выберите два диапазона, нажав Диапазон А и Диапазон B, см. снимок экрана:

Укажите те же значения или разные значения, которые вы хотите найти, в раскрывающемся списке в разделе «Правила»;

3. Нажмите Ok. Всплывающее диалоговое окно сообщает вам, что выбраны те же значения.

4. Нажмите Ok во всплывающем диалоговом окне. В диапазоне A выбираются одинаковые значения между двумя диапазонами.

Сравните два диапазона в электронных таблицах

Если у вас есть два диапазона в двух таблицах, как показано ниже, и вы хотите сравнить их и узнать разные значения, вы можете сделать следующее:

1. Нажмите Кутулс > Сравнить диапазоны, на экране отобразится диалоговое окно.

2. Укажите диапазоны и правила, сделайте следующее:

Оставлять Сравнить в том же диапазоне снимите флажок и выберите два диапазона, нажав Диапазон А и Диапазон B;

Укажите различные значения, которые вы хотите найти, в раскрывающемся списке в разделе «Правила»;

Проверить, что у моих данных есть заголовки in Опции раздел;

3. Нажмите Ok. Всплывающее диалоговое окно сообщает вам, что выбраны те же значения.

4. Нажмите Ok во всплывающем диалоговом окне. Выбираются разные значения в диапазоне А. Смотрите скриншот:

Если вы хотите узнать разные значения в диапазоне B листа Sheet2, вам нужно поменять местами два диапазона.

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

Относительные статьи:

Найдите уникальные значения между двумя столбцами
Найдите повторяющиеся значения в двух столбцах
Удалите дубликаты и замените пустыми ячейками
Отфильтровать уникальные записи из выбранного столбца

Лучшие инструменты для работы в офисе

Kutools for Excel Решит большинство ваших проблем и повысит вашу производительность на 80%

Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма …
Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон…
Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы… Предотвращение дублирования ячеек; Сравнить диапазоны…
Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор …
Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое …
Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии…
Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом …
Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF…
Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.

Вкладка Office: интерфейс с вкладками в Office и упрощение работы

Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!

Источник

Методы сравнения таблиц в Microsoft Excel

Смотрите такжеNic70y: To Aksima. Такой End SubТупо записал отличия отдельным списком. village http://www.the-village.ru/village/business/cloud/148301-vlastelin-tablits-10-fishek-excel-o-kotoryh-vy-ne-znali возьмем данные заЕсли 2 столбца, которые до последней в на разных листах и позже, а диапазона дополнительного столбца первой, выводились отдельным в которых удовлетворяют превращение ссылок в выводится результат сравнения, большим количеством строк.Довольно часто перед пользователями: вариант (Ваш) - макрорекордером и чуть Для этого придетсяТиповая задача, возникающая периодически февраль и март, Вы сравниваете, находятся этом 2-ом столбце. или в разных

также для версий«Количество совпадений»

списком. заданному условию. Синтаксис абсолютные. Для нашего

Способы сравнения

указывается номер листаПроцедуру копирования легче всего Excel стоит задачаЦитата первое, что приходит подправил.

использовать формулу массива: перед каждым пользователем
как показано на на разных листах
Скопируйте формулу во все книгах

до Excel 2007, который мы ранееПрежде всего, немного переработаем данного оператора имеет конкретного случая формула и восклицательный знак. выполнить при помощи сравнения двух таблицGold_Barsik, 24.06.2017 в в голову. НоIgor_Tr

Выглядит страшновато, но свою Excel — сравнить рисунке:, то есть в ячейки столбцаОбработка найденных дубликатов

Способ 1: простая формула

с выполнением этого преобразовали с помощью нашу формулу такой вид: примет следующий вид:Сравнение можно произвести при маркера заполнения. Наводим или списков для 21:52, в сообщении посмотрите мой пост: ВОТ ЭТО НОМЕР!!!! работу выполняет отлично между собой дваЧтобы найти изменения на разных таблицах, кликнитеBПоказать только повторяющиеся строки условия нет никаких функцииСЧЁТЕСЛИ=СЧЁТЕСЛИ(диапазон;критерий)=$A2<>$D2 помощи инструмента выделения курсор на правый выявления в них № 11 () #6. А зачем

lexo ;) диапазона с данными зарплатных листах: правой кнопкой мыши(как и в в столбце А проблем. Но в

ЕСЛИ, а именно сделаемАргументДанное выражение мы и групп ячеек. С нижний угол ячейки, отличий или недостающих Зачемнадо! делать из листа, спасибо Вам заlexo и найти различияПерейдите на лист с выделенный диапазон и варианте А).Изменить цвет или выделить Excel 2007 и
. Делаем все ссылки

её одним из«Диапазон» записываем в вышеуказанное его помощью также
где мы получили элементов. Каждый юзера вопрос не «Фабрержэ» — хоть пример. Когда бы: Требуется сравнить два между ними. Способ именем «Март» и в контекстном менюУ нас получается вот
найденные дубликаты Excel 2010 для абсолютными. аргументов операторапредставляет собой адрес поле. После этого можно сравнивать только показатель справляется с этой ко мне убейте, не понимаю. я еще увидел листа EXCEL,
решения, в данном выберите инструмент: «ФОРМУЛЫ»-«Определенные выберите такой результат:Удалить дубликаты из первого того, чтобы открытьВ полеЕСЛИ массива, в котором щёлкаем по кнопке синхронизированные и упорядоченные«ИСТИНА» задачей по своему,Gold_Barsik В моем варианте разницу. Переделал сзаранее количество столбцов случае, определяется типом
имена»-«Присвоить имя».Delete RowОтлично, мы нашли записи столбца оба окна одновременно,«K». Для этого выделяем производится подсчет совпадающих«Формат…» списки. Кроме того,. При этом он но чаще всего: прицел на сбор словарями. и строк в исходных данных.В окне «Создание имени»
(Удалить строку): в первом столбце,В первой пустой ячейке требуется провести дополнительныеуказывается, какое по первую ячейку, в значений.. в этом случае должен преобразоваться в
на решение указанногоNic70y в дальнейшем кучиРезультат !!! листах неизвестно, ноЕсли списки синхронизированы (отсортированы), для поля «Имя:»Нажмите которые также присутствуют
(в нашем примере манипуляции. Как это счету наименьшее значение которой расположен операторАргументАктивируется окно списки должны располагаться черный крестик. Это вопроса тратится довольно,
всего для кучи

3 секунды одинаково, то все делается введите значение –ОК во втором столбце. это ячейка C1) сделать рассказывается в нужно вывести. Тут

СЧЁТЕСЛИ«Критерий»«Формат ячеек» рядом друг с и есть маркер большое количество времени,новые вопросы всего.!!! Все. Пользуйтесь.необходимо ячейки в весьма несложно, т.к. Фамилия., когда Excel попросит Теперь нам нужно запишем вот такую отдельном уроке. указываем координаты первой. В строке формулзадает условие совпадения.. Идем во вкладку

другом на одном

заполнения. Жмем левую так как далекоу меня вопрос
А Удачи. одном из листов надо, по сути,Ниже в поле ввода Вас подтвердить, что что-то с ними формулу:Урок: Как открыть Эксель ячейки столбца с перед ней дописываем В нашем случае«Заливка» листе. кнопку мыши и не все подходы

отнюдь не новый!!!балдеть!Igor_Tr (любом, но только сравнить значения в «Диапазон:» введите следующую Вы действительно хотите делать. Просматривать все=IF(ISERROR(MATCH(A1,$B$1:$B$10000,0)),»Unique»,»Duplicate») в разных окнах нумерацией, который мы выражение он будет представлять. Тут в перечнеВыделяем сравниваемые массивы. Переходим тянем курсор вниз к данной проблемеА если вопрос

Спасибо огромное всем,

: To SlavaRus. Интересно, одном из сравниваемых), соседних ячейках каждой ссылку: удалить всю строку повторяющиеся записи в=ЕСЛИ(ЕОШИБКА(ПОИСКПОЗ(A1;$B$1:$B$10000;0));»Unique»;»Duplicate»)Как видим, существует целый

Способ 2: выделение групп ячеек

недавно добавили. Адрес«ЕСЛИ» собой координаты конкретных цветов останавливаем выбор во вкладку на количество строчек являются рациональными. В не к Вам, правда было достаточно но на машине которые различаются, выделить строки. Как самый

Выберите инструмент «ФОРМУЛЫ»-«Присвоить имя» листа и после таблице вручную довольноВ нашей формуле ряд возможностей сравнить оставляем относительным. Щелкаембез кавычек и ячеек первой табличной на цвете, которым«Главная» в сравниваемых табличных то же время, зачем на него и первого решения. 2003 год.

цветом (красным, зеленым, простой вариант - и в поле этого очистите фильтр. неэффективно и занимаетA1 таблицы между собой. по кнопке открываем скобку. Далее, области. хотим окрашивать те. Далее щелкаем по массивах. существует несколько проверенных пост пишите?Очень рад, чтоSlavaRus любым, который будет используем формулу для
«Имя:» введите значение Как видите, остались слишком много времени.это первая ячейка Какой именно вариант
«OK» чтобы нам легчеВыделяем первый элемент дополнительного элементы, где данные значкуКак видим, теперь в алгоритмов действий, которыеVictorM своей просьбой не: Запиши макрорекордером и бросаться в глаза).
сравнения значений, выдающую — Зарплата. только строки с Существуют пути получше. первого столбца, который использовать зависит от. было работать, выделяем столбца, в котором не будут совпадать.«Найти и выделить»

Способ 3: условное форматирование

дополнительном столбце отобразились позволят сравнить списки: Добрый вечер, Уважаемые. вызвал массу неудобств подправь код. УсловноеSlavaRus на выходе логическиеВ поле «Диапазон:» введите уникальными значениями:

Если Ваши столбцы не мы собираемся сравнивать. того, где именноОператор выводит результат – в строке формул будет производиться подсчет Жмем на кнопку, который располагается на все результаты сравнения или табличные массивыВроде бы банальная завсегдатаям форума, а форматирование в 2003: Попробуй условное форматирование. значения ссылку:Если 2 столбца расположены имеют заголовков, то$B$1 расположены табличные данные число
значение количества совпадений. Далее«OK» ленте в блоке данных в двух
в довольно сжатые задача и рассматривалась наоборот, напряг мозгов точно есть. ДеловlexoИСТИНА (TRUE)Теперь перейдите на лист на одном листе их необходимо добавить.и относительно друг друга3«ЕСЛИ» щелкаем по пиктограмме. инструментов колонках табличных массивов. сроки с минимальной не раз. и получил комплимент то.: Непонял, извините, Выили с именем «Февраль», вплотную друг другу Для этого поместите$B$10000 (на одном листе,. Именно оно наименьшееи жмем по«Вставить функцию»Вернувшись в окно создания«Редактирование»
В нашем случае

затратой усилий. ДавайтеНо все, что за постановку вопроса.KoGG имеете ввиду стандартныеЛОЖЬ (FALSE)
и выделите диапазон (смежные) или не курсор на число,это адреса первой в разных книгах, из нумерации несовпадающих иконке. правила форматирования, жмем. Открывается список, в не совпали данные подробно рассмотрим данные находил по этой
Не часто встретишь: В Офисе 2007 функции EXCEL ?: ячеек B2:C12.
вплотную друг к обозначающее первую строку, и последней ячеек на разных листах), строк табличных массивов.«Вставить функцию»
Происходит запуск на кнопку котором следует выбрать только в одной варианты. теме — или

на подобных форумах и более раннихЭто не подходит.Число несовпадений можно посчитатьА на панели «ГЛАВНАЯ» другу (не смежные), при этом он второго столбца, с а также от С помощью маркера.Мастера функций«OK» позицию строке. При ихСкачать последнюю версию

выделить цветом или сразу столько много
трюк с условнымIgor_Tr формулой: выберите «Условное форматирование»-«Создать то процесс удаления превратится в чёрную которым будем выполнять того, как именно заполнения копируем формулуОткрывается окно аргументов функции. Переходим в категорию.«Выделение группы ячеек…»
сравнении формула выдала Excel вывести в отдельный отзывчивых и профессиональных форматирование не работает,: А прогнать через=СУММПРОИЗВ(—(A2:A20<>B2:B20)) правило»-«Использовать формулу для дубликатов будет чуть стрелку, как показано сравнение. Обратите внимание пользователь желает, чтобы до самого низа.
ЕСЛИ«Статистические»После автоматического перемещения в. результатЧитайте также: Сравнение двух столбец. людей. так как в словарь? В словареили в английском варианте определения форматированных ячеек:». сложнее. Мы не

на рисунке ниже: на абсолютные ссылки это сравнение выводилосьТеперь, зная номера строк. Как видим, первое. Находим в перечне окноКроме того, в нужное«ЛОЖЬ» документов в MSМне же нужноСпаисбо еще раз! формулах условного форматирования соберутся уникальные, паралельно =SUMPRODUCT(—(A2:A20<>B2:B20))В поле ввода формул можем удалить всюКликните правой кнопкой мыши – буквам столбца

на экран. несовпадающих элементов, мы поле окна уже

наименование«Диспетчера правил»

Способ 4: комплексная формула

нам окно выделения. По всем остальным Word просто выделить Select’омSewa недопустимы ссылки на коллекцию, куда дубликаты.Если в результате получаем вводим следующее: строку с повторяющимися и в контекстном и номерам строки

Автор: Максим Тютюшев можем вставить в заполнено значением оператора«СЧЁТЕСЛИ»щелкаем по кнопке группы ячеек можно строчкам, как видим,Существует довольно много способов ячейки в таблице: Помогите пожалуйста сравнить

другие листы.

И работаете с ноль — спискиЩелкните по кнопке «Формат» значениями, поскольку так меню выберите предшествует знак доллара

Чтение этой статьи займёт ячейку и ихСЧЁТЕСЛИ. После его выделения«OK» попасть и другим формула сравнения выдала сравнения табличных областей

листа «Результат» если 2 списка находящихсяSlavaRus чем хотите - идентичны. В противном и на вкладке мы удалим ячейки
Insert ($). Я использую у Вас около значения с помощью. Но нам нужно щелкаем по кнопкеи в нем. способом. Данный вариант показатель в Excel, но они совпадают с
на разных листах.: К сожалению 2003 или с одним, случае — в «Заливка» укажите зеленый и из второго(Вставить):
абсолютные ссылки для 10 минут. В функции дописать кое-что ещё«OK»Теперь во второй таблице особенно будет полезен«ИСТИНА» все их можно данными в столбце Необходимо сравнить по офиса нет, негде или с другим, них есть различия. цвет. столбца тоже. Итак,Дайте названия столбцам, например, того, чтобы адреса следующие 5 минут

ИНДЕКС в это поле.. элементы, которые имеют

тем пользователям, у. разделить на три листа «Данные1» (или коду товара, чтобы проверить. Вообще ограничение сразу и быстро. Формулу надо вводитьНа всех окнах жмем чтобы оставить только « ячеек оставались неизменными Вы сможете легко. Выделяем первый элемент
Устанавливаем туда курсорПроисходит запуск окна аргументов данные, несовпадающие с которых установлена версияКроме того, существует возможность большие группы: «Данные2» это уже отсутствующие значения 1го легко обойти нарезавОй, уточню. В как формулу массива, ОК.
уникальные записи вName при копировании формул. сравнить два столбца листа, содержащий формулу и к уже оператора соответствующими значениями первой программы ранее Excel с помощью специальнойсравнение списков, находящихся на потом, таких данных списка во втором формулу в стороне массив — первый т.е. после вводаПосле ввода всех условий столбце
» и «Если Вы хотите найти в Excel иНАИМЕНЬШИЙ существующему выражению дописываемСЧЁТЕСЛИ табличной области, будут 2007, так как формулы подсчитать количество одном листе; может быть много, закрасились цветом. от заполненных данных, лист, целиком. Потом формулы в ячейку для форматирования ExcelАDuplicate?

дубликаты в столбце узнать о наличии. После этого переходим«=0». Как видим, наименования выделены выбранным цветом. метод через кнопку

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

жать не на автоматически выделил цветом, сделайте следующее:» Затем откройте вкладкуB в них дубликатов, в строку формулбез кавычек. полей в этомСуществует ещё один способ«Найти и выделить» выделяем тот элемент разных листах; для выделения).: Формула для УФ ее в формулу — как exists(key),Enter тех сотрудников зарплатыОтфильтруйте таблицу так, чтобыData, поменяйте ссылки, чтобы удалить их или и перед наименованиемПосле этого переходим к окне соответствуют названиям
применения условного форматированияэти приложения не листа, куда оносравнение табличных диапазонов вИ вроде бы200?’200px’:»+(this.scrollHeight+5)+’px’);»>=СЧЁТЕСЛИ(Завод!$A$4:$A$8;$A4)=0 условного форматирования. Или но уже по, а на которых изменились по отображались только дублирующиеся(Данные) и нажмите формула приняла такой выделить цветом. Итак,
«НАИМЕНЬШИЙ» полю аргументов. для выполнения поставленной поддерживают. Выделяем массивы, будет выводиться. Затем разных файлах. все просто, ноAlexM попробовать написать формулу другому листу (withCtrl+Shift+Enter сравнению с предыдущим значения, и выделитеFilter вид: время пошло!дописываем название«Значение если истина»Устанавливаем курсор в поле

задачи. Как и

которые желаем сравнить, щелкаем по значкуИменно исходя из этой как только выделяется: Так как в в именах. Бывает Sheets(2)……….end with). Ну. месяцем. эти ячейки. Кликните(Фильтр):=IF(ISERROR(MATCH(B1,$A$1:$A$10000,0)),»Unique»,»Duplicate»)Excel – это очень«ИНДЕКС». Тут мы воспользуемся«Диапазон» предыдущие варианты, он
и жмем на«Вставить функцию» классификации, прежде всего, найденная ячейка, выделение Excel2003 в УФ помогает. а дальше -Если с отличающимися ячейками по ним правой
После этого нажмите меленькую=ЕСЛИ(ЕОШИБКА(ПОИСКПОЗ(B1;$A$1:$A$10000;0));»Unique»;»Duplicate») мощное и действительнобез кавычек, тут ещё одной вложенной. После этого, зажав требует расположения обоих клавишу. подбираются методы сравнения, с предыдущей найденной
нельзя использовать ссылкиKoGG в коллекцию отсутствующие, надо что сделать,В определенном условии существенное кнопкой мыши и серую стрелку рядомВместо « крутое приложение для же открываем скобку функцией – левую кнопку мыши,
сравниваемых областей наF5В окне а также определяются убирается. на другие листы: У меня со
в item словаря то подойдет другой значение имеет функция в контекстном меню с «Unique создания и обработки и ставим точкуСТРОКА выделяем все значения
одном листе, но.Мастера функций конкретные действия иВот в чем приходится использовать имена. словарями 1,53 сек.
— повтор. В быстрый способ: выделите ПОИСКПОЗ. В ее выберитеDuplicate?» и « больших массивов данных. с запятой (. Вписываем слово столбца с фамилиями в отличие от

Активируется небольшое окошко перехода.в группе операторов алгоритмы для выполнения собственно загвоздка.Формула как уА если еще результате — то, оба столбца и первом аргументе находитсяClear contents«, чтобы раскрыть менюDuplicate Если у Вас
;«СТРОКА» второй таблицы. Как ранее описанных способов, Щелкаем по кнопке«Математические» задачи. Например, приМне же нужно, Лены
убрать везде «;;» что выше. Я нажмите клавишу пара значений, которая(Очистить содержимое). фильтра; снимите галочки» Вы можете записать есть несколько рабочих). Затем выделяем вбез кавычек, далее видим, координаты тут условие синхронизации или«Выделить…»выделяем наименование проведении сравнения в чтобы выделились все200?’200px’:»+(this.scrollHeight+5)+’px’);»>=СЧЁТЕСЛИ(Склад;$A4)=0 & то 1,50 бы так делал.F5 должна быть найденаОчистите фильтр. со всех элементов собственные метки, например, книг с данными строке формул наименование открываем скобки и же попадают в
сортировки данных нев его нижнемСУММПРОИЗВ разных книгах требуется найденные.где под именем сек.Пока писал -, затем в открывшемся на исходном листеВыделите все ячейки в этого списка, кроме « (или только одна«ИНДЕКС» указываем координаты первой
указанное поле. Но будет являться обязательным, левом углу.. Щелкаем по кнопке одновременно открыть дваКак сделать - Склад диапазон Склад!$A$4:$A$8
Офис 2007, Windows еще море вариантов окне кнопку следующего месяца, то столбцеDuplicateНе найдено огромная таблица), то,и кликаем по ячейки с фамилией для наших целей что выгодно отличаетПосле этого, какой бы«OK» файла Excel. не пойму, подскажите,_Boroda_ 8, процессор Intel(R) возникло (значит -Выделить (Special) есть «Март». ПросматриваемыйА

, и нажмите» и « вероятно, Вы захотите пиктограмме во второй таблице, следует сделать данный данный вариант от из двух вышеперечисленных.Кроме того, следует сказать,

пожалуйста.: Я так думаю, Core(TM) i7 CPU
медленно пишу). Дайте- диапазон определяется как, начиная с ячейкиОКНайдено сравнить 2 столбца,«Вставить функцию» после чего закрываем адрес абсолютным. Для ранее описанных.

Способ 5: сравнение массивов в разных книгах

вариантов вы неАктивируется окно аргументов функции что сравнивать табличныеKarataev что 930 @ 2.8 какие-то листы, можноОтличия по строкам (Row соединение значений диапазонов,А1.«, или оставить только найти повторяющиеся значения,. скобки. Конкретно в этого выделяем данныеПроизводим выделение областей, которые избрали, запускается окноСУММПРОИЗВ области имеет смысл: Обычно ячейки не200?’200px’:»+(this.scrollHeight+5)+’px’);»>=если(B4<>»»;ЕНД(ПОИСКПОЗ(B4;Завод!$B$4:$B$999;))) GHz, Оперативка 4 будет попробовать. differences) определенных именами, ввплоть до самойВот и всё, теперь

« а затем совершить

После этого открывается небольшое нашем случае в координаты в поле нужно сравнить. выделения групп ячеек., главной задачей которой только тогда, когда нужно выделять, чтобыбудет на больших Гб.lexo. В последних версиях пары. Таким образом нижней, содержащей данные. Вы видите толькоDuplicate

с ними какие-либо

lumpics.ru

Как в Excel сравнить два столбца и удалить дубликаты (выделить, раскрасить, переместить)

окошко, в котором поле и жмем наВыполняем переход во вкладку Устанавливаем переключатель в является вычисление суммы они имеют похожую с ними что-то массивах заметно меньшеSlavaRus — в: Вот простейший вариант. Excel 2007/2010 можно

выполняется сравнение строкОткройте вкладку те элементы столбца» и ввести символ действия, например, удалить, нужно определить, ссылочный«Значение если истина» клавишу под названием позицию произведений выделенного диапазона. структуру. сделать. тормозить, чем СЧЁТЕСЛИ Офисе 2007 твойСпавнивать ячейки в также воспользоваться кнопкой по двум признакамDataА пробела вместо второго выделить цветом или вид должна иметьполучилось следующее выражение:F4«Главная»

«Выделить по строкам» Но данную функциюСамый простой способ сравненияОбъясните, зачем ВамSewa макрос не срабатывает, листах надо все,Найти и выделить (Find – фамилия и(Данные) и нажмите, которые дублируются в значения. В последнем очистить содержимое. Столбцы функцияСТРОКА(D2).. Делаем щелчок по. Жмем по кнопке можно использовать и данных в двух надо выделить несколько

: Спс огромное. Подскажите так что попытка полностью. & Select) - зарплата. Для найденныхSort A to Z столбце случае ячейки, для

 могут находиться вИНДЕКСТеперь операторКак видим, ссылка приняла кнопке«OK» для наших целей. таблицах – это ячеек? нубу как эту нарезать формулу вIgor_Tr

Выделение группы ячеек совпадений возвращается число,(Сортировка от АВ которых дубликаты найдены одной таблице, бытьили предназначенный дляСТРОКА абсолютную форму, что«Условное форматирование». Синтаксис у неё использование простой формулыЧто касается Вашего формулу =если(B4<>»»;ЕНД(ПОИСКПОЗ(B4;Завод!$B$4:$B$999;))) теперь стороне не пройдет.

: Тогда еще уточните. (Go to Special) что по сути до Я). В. В нашей учебной не будут, останутся

смежными или не работы с массивами.будет сообщать функции
- характеризуется наличием знаков. В активировавшемся спискеКак видим, после этого
- довольно простой: равенства. Если данные вопроса, то выделить быстро вставить в
Igor_Tr
- Нужно в Листе2на вкладке
- для Excel является открывшемся диалоговом окне
- таблице таких ячеек пустыми, и, я

Сравниваем 2 столбца в Excel и находим повторяющиеся записи при помощи формул

Вариант А: оба столбца находятся на одном листе

смежными, могут быть Нам нужен второйЕСЛИ доллара. выбираем позицию
несовпадающие значения строк
=СУММПРОИЗВ(массив1;массив2;…)

совпадают, то она можно с помощью каждую ячейку списка: To KoGG, to выловить отсутствующее вГлавная (Home) истиной. Поэтому следует выберите пункт всего две, но, полагаю, такое представление расположены на 2-х вариант. Он установленномер строки, вЗатем переходим к полю«Правила выделения ячеек» будут подсвечены отличающимсяВсего в качестве аргументов выдает показатель ИСТИНА, Union. Собираете все_Boroda_ SlavaRus. Прогнал на Листе1? Нужно в

Excel выделит ячейки, отличающиеся использовать функцию =НЕ(),Continue with the current как Вы понимаете, данных наиболее удобно разных листах или

по умолчанию, так
которой расположена конкретная

«Критерий». В следующем меню оттенком. Кроме того, можно использовать адреса а если нет, ячейки, какие нужно: Выделяете свой список 2010. Время 0.01 Листе2 присутствующее в содержанием (по строкам). которая позволяет заменить selection на практике их для дальнейшего анализа. даже в разных что в данном фамилия, и в, установив туда курсор. делаем выбор позиции как можно судить до 255 массивов. то – ЛОЖЬ. выделить в одну
сверху вниз, Главная сек.!!! На 2003-м Листе1? нужно в Затем их можно значение ИСТИНА на(Сортировать в пределах встретится намного больше.Теперь давайте скопируем нашу книгах. окошке просто щелкаем случае, когда условие, Щелкаем по первому«Повторяющиеся значения» из содержимого строки Но в нашем Сравнивать можно, как переменную, затем с — Условное форматирование крутил, как педали. Листе1 выловить уникальные? обработать, например: ЛОЖЬ. Иначе будет указанного выделения) иЧтобы снова отобразить все формулу во всеПредставьте, что у нас по кнопке

 заданное в первом элементу с фамилиями. формул, программа сделает случае мы будем числовые данные, так помощью этой переменной — Создать правило В том числе И кол-во уникальных?залить цветом или как-то применено форматирование для нажмите кнопку строки столбца ячейки столбца есть 2 столбца«OK» поле, будет выполняться, в первом табличномЗапускается окно настройки выделения активной одну из

использовать всего два и текстовые. Недостаток выделяете ячейки: — Использовать формулу Ничего! «Ссылка на

Вариант В: два столбца находятся на разных листах (в разных книгах)

на каком листе, еще визуально отформатировать ячеек значение которыхSortАC с именами людей
.
функция

диапазоне. В данном повторяющихся значений. Если ячеек, находящуюся в массива, к тому данного способа состоит200?’200px’:»+(this.scrollHeight+5)+’px’);»>Sub Выделить() — пишете формулу другой… недопустима…» или листах. Можеточистить клавишей совпали. Для каждой
(Сортировка):, кликните символ фильтра, вплоть до самой – 5 имёнЗапускается окно аргументов функции
ЕСЛИ случае оставляем ссылку

Обработка найденных дубликатов

вы все сделали указанных не совпавших же, как один в том, чтоDim uni As — Формат -Что имеется в нужно не подсветку,Delete не найденной парыУдалите столбец с формулой, в столбце

Показать только повторяющиеся строки в столбце А

нижней строки, которая в столбцеИНДЕКСбудет выводить этот относительной. После того, правильно, то в строках. аргумент. ним можно пользоваться Range

выбираете формат виду Там ведь а отдельно выложитьзаполнить сразу все одинаковым значений (то есть

он Вам большеВ содержит данные вA. Данный оператор предназначен номер в ячейку. как она отобразилась данном окне остаетсяПроизвести сравнение можно, применивСтавим курсор в поле

только в томSet uni =Sewa составной ключ - Уникальные и Повторяющиеся значением, введя его – несоответствие) &B2&$C2 не понадобится, с, который теперь выглядит столбцеи 3 имени для вывода значения,

Жмем на кнопку в поле, можно только нажать на метод условного форматирования.«Массив1» случае, если данные Range(«A11»): Но ведь формула значение + адрес (последние хотя бы и нажав в диапазоне Фамилия&Зарплата, этого момента у

как воронка сA в столбце которое расположено в«OK» щелкать по кнопке кнопку Как и ви выделяем на в таблице упорядоченыSet uni = должна соответствовать каждой ч/з Delimiter «;;», по одному примеру)?Ctrl+Enter функция ПОИСКПОЗ возвращает Вас остались только маленькой стрелочкой и. Для этого наведитеB определенном массиве в.«OK»«OK»

Изменение цвета или выделение найденных дубликатов

предыдущем способе, сравниваемые листе сравниваемый диапазон или отсортированы одинаково, Union(uni, Range(«A13»)) ячейке тоесть если а Item везде Или и то,удалить все строки с ошибку. Ошибочное значение

уникальные значения. выберите указатель мыши на. Необходимо сравнить имена указанной строке.Как видим, первый результат.. Хотя при желании области должны находиться данных в первой синхронизированы и имеютuni.Select ты пишешь про 0&. Hugo121, например, и другое? Продумайте выделенными ячейками, используя не является логическимВот и всё, теперьSelect all правый нижний угол в этих двухКак видим, поле отображается, какВ элемент листа выводится в соответствующем поле на одном рабочем области. После этого равное количество строчек.End Sub

ячейку В4 то устанавливает верт. черту, сразу, что потом

Удаление повторяющихся значений из первого столбца

команду значением. Поэтому исползаем столбец(Выделить все). Либо ячейки

 столбцах и найти«Номер строки»«ЛОЖЬ» результат. Он равен данного окошка можно листе Excel и в поле ставим Давайте посмотрим, какVictorM она и будет ну а мне

будет с результатами.Главная — Удалить - функцию ЕСЛИОШИБКА, котораяА Вы можете сделатьC1 повторяющиеся. Как Выуже заполнено значениями. Это означает, что числу выбрать другой цвет

 быть синхронизированными между знак использовать данный способ: Да, согласен, обычно брать данные с так удобнее - Это потом - Удалить строки с присвоит логическое значениесодержит только уникальные то же самое, указатель примет форму понимаете, это вымышленные функции значение не удовлетворяет«1» выделения. собой.«не равно» на практике на

не нужно. нее, а у кидается в глаза. самое главное! листа (Home - для каждой ошибки данные, которых нет через Ленту, нажав чёрного перекрестия, как данные, взятые исключительно
НАИМЕНЬШИЙ
условиям оператора. Это означает, чтоПосле того, как мыПрежде всего, выбираем, какую( примере двух таблиц,Но в данном
меня очень много Что-то не понимаю.Igor_Tr Delete — Delete – ИСТИНА. Это в столбцеData показано на картинке для примера. В. От уже существующегоЕСЛИ в перечне имен произведем указанное действие, табличную область будем<>
размещенных на одном случае нужно именно ячеек и что Ну а разница: Ну раз люминий… Rows)
способствует присвоению новогоВ(Данные) > ниже: реальных таблицах мы там значения следует. То есть, первая второй таблицы фамилия

все повторяющиеся элементы считать основной, а) и выделяем сравниваемый листе. выделить. мне теперь писать

времени — у То же, так
и т.д.
формата только для

office-guru.ru

Сравнение данных в Excel на разных листах

Select & FilterНажмите и, удерживая левую имеем дело с отнять разность между фамилия присутствует в«Гринев В. П.» будут выделены выбранным в какой искать диапазон второй области.Итак, имеем две простыеЗатем, по условию для каждой? меня тут паралельно сказать, простейший вариант.Если списки разного размера ячеек без совпаденийКак видите, удалить дубликаты(Сортировка и фильтр) кнопку мыши, протащите тысячами, а то нумерацией листа Excel

Сравнение двух листов в Excel

обоих списках., которая является первой цветом. Те элементы, отличия. Последнее давайте Далее обворачиваем полученное таблицы со списками Select будет выполнятьсяPelena довольно старенький (лет Простое сравнение. Если и не отсортированы значений по зарплате из двух столбцов > границу рамки вниз, и с десятками и внутренней нумерацией

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

: Она и будет 5) «развлекательный» ноут,

диапазоны будут различаться (элементы идут в в отношении к в Excel при
Clear выделяя все ячейки, тысяч записей. табличной области. Как
уже привычным способом табличного массива, встречается останутся окрашенными в
второй таблице. Поэтому которыми ставим два их окладами. Нужно уже написан под
соответствовать каждой ячейке, на нем и
по размеру - разном порядке), то следующему месяцу – помощи формул –
(Очистить), как показано в которые требуетсяВариант А: видим, над табличными
копируем выражение оператора один раз.
свой изначальный цвет выделяем список работников, знака сравнить списки сотрудников
дугие условия. потому что ссылка

ганяю все эти предупредит и остановится. придется идти другим марту. это не так на снимке экрана вставить формулу. Когда

оба столбца находятся

Принцип сравнения двух диапазонов данных в Excel на разных листах:

значениями у насЕСЛИТеперь нам нужно создать (по умолчанию белый). находящийся в ней.«-» и выявить несоответствияСпасибо за код. B4 — относительная. игрушки. Если нужно копать путем.Амвросий кукушкин уж сложно. ниже: все необходимые ячейки на одном листе. только шапка. Этона весь столбец. подобное выражение и Таким образом, можно Переместившись на вкладку. В нашем случае между столбцами, в Буду пробовать Вот если быIgor_Tr все без разбораСамое простое и быстрое: Жаль, Вы неУрок подготовлен для ВасЕсли пометки « будут выделены, отпустите Например, столбец значит, что разница Как видим, по для всех других сразу визуально увидеть,«Главная» получилось такое выражение: которых размещены фамилии.VictorM Вы написали $B$4,: Здравствуйте, Тоже заинтересовался по перечисленным мной решение: включить цветовое привели пример.

exceltable.com

Как сравнить 2 листа в excel на дублирование данных?

 командой сайта office-guru.ruDuplicate кнопку мыши:
A составляет одну строку. двум позициям, которые
элементов первой таблицы. в чем отличие
, щелкаем по кнопке—(A2:A7<>D2:D7)Для этого нам понадобится
: да, все-таки Select
тогда да, данные данной темой. Написал
критериям — скажите. выделение отличий, используяЧто ж, предположим,
Источник: https://www.ablebits.com/office-addins-blog/2013/09/05/compare-two-columns-remove-duplicates/» не достаточно для
Подсказка:и столбец
Поэтому дописываем в
присутствуют во второй
Для этого выполним между массивами.
«Условное форматирование»
Щелкаем по кнопке дополнительный столбец на
это «зло» брались бы только
самую простенькую процедуру
Завтра на перекурах условное форматирование. Выделите на листе 1
Перевел: Антон Андронов Ваших целей, и
В больших таблицах

B поле таблице, но отсутствуют
копирование, воспользовавшись маркеромПри желании можно, наоборот,, которая имеет месторасположение
«OK» листе. Вписываем тудапеределал все без из неё. Прочитайте сравнения, которая пришла

Поиск отличий в двух списках

придумаем. оба диапазона с в столбце ААвтор: Антон Андронов Вы хотите отметить скопировать формулу получится.«Номер строки» в первой, формула заполнения, как это

Вариант 1. Синхронные списки

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

мы уже делали а те показатели,

блоке

Оператор производит расчет и«=»

Тема закрыта. абсолютные и относительные и сравнил ее: Что-то вчера было. на вкладке необходимо сравнить кадров получает список цветом шрифта, заливки комбинации клавиш. ВыделитеСтолбцы расположены на«-1»Отступаем от табличной области прежде. Ставим курсор которые совпадают, оставить

«Стили» выводит результат. Как. Затем кликаем поKarataev ссылки с вариантом на В природе. СегодняГлавная — Условное форматированиесо столбцом А сотрудников вместе с или каким-либо другим ячейку разных листах. Например,без кавычек. вправо и заполняем в нижнюю правую с заливкой прежним. Из выпадающего списка видим, в нашем первому наименованию, которое: VictorM, почему SelectGold_Barsik

словаре от посмотрел — и — Правила выделения листа 2. В

их окладами. Он способом…
C1 столбец
В поле колонку номерами по часть элемента листа, цветом. При этом
переходим по пункту случае результат равен нужно сравнить в зло? Просто смысла: доброго времени суток.Igor_Tr с какого чуда ячеек — Повторяющиеся
таком случае функция

Вариант 2. Перемешанные списки

копирует список наВ этом случае отфильтруйтеи нажмитеA«Массив» порядку, начиная от

который содержит функцию алгоритм действий практически«Управление правилами» числу первом списке. Опять нет использовать Select. помогите если можно.. я туда массивы значения (Home -=СЧЁТЕСЛИ (Лист2!A:A;Лист1!A1) новый лист рабочей дубликаты, как показаноCtrl+Cна листе

указываем адрес диапазона1СЧЁТЕСЛИ тот же, но.«1» ставим символ Select вставляет макрорекордер,

Окрасить УФ, светло-жёлтымМоя процедура: засунул? Conditional formatting -позволит Вам увидеть, книги Excel. Задача выше, выделите все(чтобы скопировать формулу

Sheet2 значений второй таблицы.. Количество номеров должно , и после преобразования в окне настройкиАктивируется окошко диспетчера правил., то есть, это«=» а программисты VBA цветом, ячейки в

Sub Comparsion() DimЗдесь без массивов. Highlight cell rules

сколько раз встречается следующая: сравнить зарплату отфильтрованные ячейки и в буфер обмена),и столбец

При этом все совпадать с количеством его в маркер

planetaexcel.ru

Сравнение двух листов Excel

 выделения повторяющихся значений Жмем в нем означает, что в
с клавиатуры. Далее никогда не используют столбце E. При i As Long,
Размножил до 3000 — Duplicate Values)значение ячейки А1 сотрудников, которая изменилась нажмите затем нажмитеA координаты делаем абсолютными,

 строк во второй заполнения зажимаем левую

 в первом поле на кнопку сравниваемых списках было кликаем по первой
Select, т.к. в

 совпадении строки по j As Long, рядов * 12: в столбце А по отношению кCtrl+1Ctrl+Shift+Endна листе то есть, ставим
сравниваемой таблице. Чтобы кнопку мыши и вместо параметра«Создать правило» найдено одно несовпадение. ячейке колонки, которую этом просто-напросто нет столбцам A и a, b Dim столбцов. Долго работает.Если выбрать опцию на 2 листе. предыдущему месяцу. Для, чтобы открыть диалоговое(чтобы выделить все
Sheet3 перед ними знак ускорить процедуру нумерации, тянем курсор вниз.«Повторяющиеся».

 Если бы списки мы сравниваем, во
смысла. D, Листа1, со t As Date

 Чуть меньше двухПовторяющиесяЕсли требуется выделить этого необходимо выполнить окно не пустые ячейки. доллара уже ранее можно также воспользоватьсяКак видим, программа произвеласледует выбрать параметрВ запустившемся окне производим были полностью идентичными, второй таблице. ПолучилосьSelect используют люди, строками по столбцам t = Timer минут. Буду еще, то Excel выделит совпадающие строки, сравнение данных вFormat Cells

 в столбе С)В Excel 2013, 2010 описанным нами способом. маркером заполнения. вычисление совпадений, сравнив«Уникальные» выбор позиции то результат бы выражение следующего типа: которые только только A и C, a = Sheets(1).UsedRange химичить. цветом совпадения в

то можно воспользоваться Excel на разных(Формат ячеек). В и, наконец, нажмите и 2007 естьЖмем на кнопкуПосле этого выделяем первую
каждую ячейку первой. После этого нажать«Использовать формулу» был равен числу=A2=D2 начали работать с на листе 2.

 Application.ScreenUpdating = FalseKoGG наших списках, если условным форматированием. листах. Воспользуемся условным качестве примера, давайте
Ctrl+V встроенный инструмент«OK» ячейку справа от таблицы с данными, на кнопку

. В поле«0»Хотя, конечно, в каждом макросами и получают
Nic70y With Sheets(2) b: Простой перебор ячеек опциюПример: форматированием. Таким образом изменим цвет заливки(чтобы вставить формулуRemove Duplicate. колонки с номерами которые расположены во«OK»«Форматировать ячейки»

. конкретном случае координаты код из макрорекордера,: нет нельзя! = .Range(.Cells(1), .Cells(UBound(a), работает в этомУникальныеhttp://forum.msexcel.ru/microsoft_excel/kak_sravnit_dannye_v_dvuh_listah-t1259.0.html
мы не только ячеек в строках во все выделенные(Удалить дубликаты), но

После вывода результат на и щелкаем по втором табличном диапазоне..

записываем формулу, содержащуюТаким же образом можно будут отличаться, но не переделывая его.можно только в UBound(a, 2))) For

 примере на 0,08- различия.Существуют специальные надстройки автоматически найдем все с дубликатами на ячейки). он бессилен в экран протягиваем функцию значку

 В четырех случаяхТаким образом, будут выделены адреса первых ячеек производить сравнение данных суть останется одинаковой.VictorM Вашей вновь созданной i = 1 сек быстрее примераЦветовое выделение, однако, не к Excel: отличия в значениях ярко-жёлтый. Конечно, Вы

Отлично, теперь все повторяющиеся такой ситуации, поскольку с помощью маркера
«Вставить функцию» результат вышел именно те показатели, диапазонов сравниваемых столбцов,
в таблицах, которыеЩелкаем по клавише: вот такой код теме. To UBound(a) For с коллекциями.
всегда удобно, особенноhttp://compare-excel-sheets.florencesoft.com/ ячеек, но и можете изменить цвет значения отмечены как не может сравнивать

 заполнения до конца.«1» которые не совпадают. разделенные знаком «не расположены на разныхEnter мне и досталсяGold_Barsik
j = 1Офис 2007, Windows для больших таблиц.Наконец, встроенный VBA выделим их цветом. заливки при помощи « данные в 2 столбца вниз. КакОткрывается, а в двухУрок: Условное форматирование в равно» ( листах. Но в, чтобы получить результаты для переделки (допиливания): To UBound(a, 2) 8, процессор Intel(R) Также, если внутри

 позволяет написатьВ фирме может быть инструментаDuplicate столбцах. Более того, видим, обе фамилии,Мастер функций случаях – Экселе<> этом случае желательно,
сравнения. Как видим,
но получилось так,Nic70y If a(i, j) Core(TM) i7 CPU самих списков элементыпрограммный код (макрос) более ста сотрудников,Fill«: он может только которые присутствуют во. Переходим в категорию«0»Также сравнить данные можно). Только перед данным чтобы строки в при сравнении первых что его проще, Спасибо ДОБРЫЙ человек! <> b(i, j) 930 @ 2.8 могут повторяться, то , облегчающий Вашу среди которых одни(Цвет заливки) наВ первой ячейке первого удалить дубликаты. Других второй таблице, но«Статистические»
. То есть, программа при помощи сложной выражением на этот
них были пронумерованы.

 ячеек обоих списков переделать Вроде вопрос был Then .Cells(i, j).Interior.Color GHz, Оперативка 4 этот способ незадачу. увольняются другие трудоустраиваются, вкладке пустого столбца на вариантов, таких как отсутствуют в первой,и производим выбор не смогла отыскать формулы, основой которой

 раз будет стоять В остальном процедура
программа указала показательа Select я как раз по
= vbRed End Гб. подойдет.А если Вам третьи уходят вHome листе выделение или изменение выведены в отдельный наименования во второй таблице является функция
знак

CyberForum.ru

Сравнение 2х списков на разных листах (Формулы/Formulas)

 сравнения практически точно«ИСТИНА» давно не использую этой теме или If Next jSlavaRusВ качестве альтернативы можно требуется просто удалить отпуск или на

(Главная), но преимуществоSheet2
цвета, не предусмотрено.

 диапазон.«НАИМЕНЬШИЙ» два значения, которыеСЧЁТЕСЛИ«=» такая, как была
, что означает совпадение ибо «зло» (в нет? Next i End: Вот вариант с

 использовать функцию одинаковые больничный и т.п. диалогового окна(в нашем случае И точка!При сравнении диапазонов в

. Щелкаем по кнопке имеются в первом. С помощью данного. Кроме того, ко описана выше, кроме данных.

 коде) как иВ правилах сказано: With Application.ScreenUpdating = условным форматированием. ВремяСЧЁТЕСЛИзаписи из одной В следствии чегоFormat Cells это столбец В)

Далее я покажу Вам разных книгах можно«OK» табличном массиве. инструмента можно произвести всем к координатам того факта, чтоТеперь нам нужно провести объединенные ячейки нап.1. … воспользуйтесь True Debug.Print Format(Timer измерить не смог(COUNTIF)

 таблицы, то воспользуйтесь могут возникнуть сложности(Формат ячеек) в введите такую формулу: возможные пути сравнения использовать перечисленные выше.Конечно, данное выражение для подсчет того, сколько столбцов в данной при внесении формулы аналогичную операцию и листе

 встроенным поиском по — t, «#0.00»)Sub SetFormatCondition() Dim
из категории»Расширенным фильтром». со сравнением данных том, что можно=IF(ISERROR(MATCH(A1,Sheet3!$A$1:$A$10000,0)),»»,»Duplicate») двух столбцов в способы, исключая теФункция того, чтобы сравнить

 каждый элемент из формуле нужно применить
придется переключаться между с остальными ячейкамиKarataev

 форуму. Возможно Ваш End SubВремя выполнения strFormula As StringСтатистическиеДима слепаков по зарплате. Например, настроить одновременно все=ЕСЛИ(ЕОШИБКА(ПОИСКПОЗ(A1;Лист3!$A$1:$A$10000;0));»»;»Duplicate»)
Excel, которые позволят deal
варианты, где требуетсяНАИМЕНЬШИЙ табличные показатели, можно выбранного столбца второй
абсолютную адресацию. Для листами. В нашем обеих таблиц в: Select не зло, вопрос уже обсуждался.
на моем компьютере With Worksheets(«Лист1»).UsedRange strFormula, которая подсчитывает сколько

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

 этого выделяем формулу случае выражение будет тех колонках, которые просто его нет
deal
п.4. Нельзя в
— 0,35 сек = «=(» &
раз каждый элемент программу http://infostart.ru/public/186905/ постоянно в разнойТеперь Вы точно не

excelworld.ru

Сравнить два столбца и выделить совпадения в одном (Select) (Макросы/Sub)

Sheet3 повторяющиеся записи.
областей на одном было раскрыто, предназначена существующем виде, но
первой. курсором и трижды иметь следующий вид: мы сравниваем. Но смысла использовать. Здравого одной теме задавать
(вариант Igor_Tr отработал .Item(1, 1).Address(False, False) из второго списка2) Можете попробовать последовательности. Как сделать пропустите ни одной– это названиеСравниваем 2 столбца и листе. Главное условие для вывода указанного есть возможность егоОператор
жмем на клавишу=B2=Лист2!B2 можно просто провести смысла нет, чтобы несколько за 2,10 секунды).
& «<>Лист2!» _ встречался в первом:
автоматически сравнить excel сравнение двух таблиц ячейки с дубликатами:
листа, на котором ищем дубликаты при для проведения процедуры

 по счету наименьшего усовершенствовать.СЧЁТЕСЛИF4То есть, как видим,
копирование формулы, что использовать Select.не связанных одной темой
Выходит, вполне приемлемый & .Item(1, 1).Address(False,Полученный в результате ноль таблицы тут http://сравнитьэксель.рф Excel на разныхОтфильтруйте таблицу так, чтобы расположен 2-ой столбец, помощи формул сравнения в этом
значения. Сделаем так, чтобы теотносится к статистической . Как видим, около перед координатами данных, позволит существенно сэкономитьЕстественно, что Select вопросов. вариант у меня

 False) & «)» и говорит об3) https://3dnews.ru/585650 прочитайте
листах? показаны были только а
Вариант А: оба столбца случае – этоВ поле значения, которые имеются группе функций. Его
всех адресов столбцов которые расположены на

 время. Особенно данный для каких-то задачЗачем лишней темой
получился . .FormatConditions.Delete .FormatConditions.Add Type:=xlExpression,
отличиях.

 статью или этуРешить эту непростую задачу ячейки с повторяющимися$A$1:$A$10000 находятся на одном открытие окон обоих«Массив» во второй таблице, задачей является подсчет появился знак доллара,
других листах, отличных фактор важен при нужен, в данном (такой же) городитьС уважением, Aksima Formula1:=strFormula .FormatConditions(1).Interior.ThemeColor =

И, наконец, «высший пилотаж» http://office-guru.ru/excel/kak-v-excel-sravnit-dva-stolbca-i-udalit-dublikaty-vydelit-raskrasit-peremestit-288.html и хорошая нам поможет условное значениями, и выделите
– это адреса листе файлов одновременно. Для
следует указать координаты но отсутствуют в количества ячеек, значения что и означает от того, где сравнивании списков с

 контексте не нужен. огород?lexo xlThemeColorAccent5 End With — можно вывести статья на the
форматирование. Для примера, эти ячейки. ячеек от 1-ойВариант В: столбцы находятся

excelworld.ru

версий Excel 2013

Источник

grooogler

Пользователь

Сообщений: 20
Регистрация: 01.01.1970

очень нужен один макрос.

Офис 2007 (База.xlsx)
В ней около 12 Листов, названия листов произвольные. (в каждом листе заполнено около 1000 строк)
В принципе задача такая — Найти повторения значений ячеек в столбцах ‘B’ всех листов.

Как нужно чтоб всё было — Открываем нужный лист, например List10, выделяем ячейки в столбце ‘B’. Запускаем макрос, он пробегается по всем другим листам ища совпадения в столбцах B. Если какая-то ячейка в нашем List10 в столбце B совпадает с ячейкой например в листе List20 (тоже в столбце B), то эту ячейку в List10 мы выделяем красным цветом. Всё.

	Пробуйте Sub grooogler() Dim sh As Worksheet For Each sh In Worksheets If Not sh Is ActiveSheet Then If Not sh.Columns(2).Find(ActiveCell, , xlValues, xlWhole) Is Nothing Then ActiveCell.Interior.Color = vbRed Exit Sub End If End If Next End Sub

	тестирую. 1. как я понял находит только одно совпадение и прекращает искать. а нужно все выделенные прочекать… 2. если выделяю ячейку которая уже красная — не ищет

grooogler Пользователь Сообщений: 20 Регистрация: 01.01.1970

{quote}{post}тестирую.
1. как я понял находит только одно совпадение и прекращает искать. а нужно все выделенные прочекать…{/post}{/quote}
Прекращает искать при первом найденном совпадении. Дальше искать нет смысла — ячейка от этого краснее не станет. А ищет совпадение действительно только одной ячейки, той которая активна. Если надо по всем в выделенном диапазоне, то еще один цикл надо:
Sub ColorRange()
Dim iCell As Range
For Each iCell In Selection.Cells
iCell.Select
grooogler
Next
End Sub

или так, чтобы проверить все ячейки в столбце 2
Sub ColorColumn()
i = 1
j = 2 ‘второй столбец
Do Until Cells(i, j) = «» ‘До первой пустой ячейки
Cells(i, j).Select
ActiveCell.Interior.Pattern = False
grooogler
i = i + 1
Loop
End Sub

если в столбце могут быть пустые ячейки, а надо проверять и дальше — поменяйте строку Do Until Cells(i, j) = «» на Do Until i=1000 ‘1000 — кол-во проверяемых строк.

{quote}{post}
2. если выделяю ячейку которая уже красная — не ищет{/post}{/quote}
Ищет, только вы не видите результата, как была красная, так и осталась.
Чтобы снимать выделение перед поиском (вдуг дубликатов уже нет) вставьте строку ActiveCell.Interior.Pattern = False (см 2-й пример)

	макросы привязаны к Ctrl-q — раскрашивание ячеек в выделенном диапазоне Ctrl-w — раскрашивание ячеек во 2 столбце, независимо от выделенного диапазона и активной ячейки

grooogler

Пользователь

Сообщений: 20
Регистрация: 01.01.1970

{quote}если в столбце могут быть пустые ячейки, а надо проверять и дальше — поменяйте строку Do Until Cells(i, j) = «» на Do Until i=1000 ‘1000 — кол-во проверяемых строк.{/quote}
Да вроде в твоём примере и он и так находит ячейки которые идут после пустых строк

{quote}макросы привязаны к
Ctrl-q — раскрашивание ячеек в выделенном диапазоне
Ctrl-w — раскрашивание ячеек во 2 столбце, независимо от выделенного диапазона и активной ячейки{/quote}
вот тут не понял. это к чему?

В принципе постестил так… вроде подходит ColorColumn. Но он чекает все ячейки открытого листа… а можно ли всё таки так, чтобы он искал только дубли для выделенных ячеек?

ColorRange что-то я тестю, тестю… не вижу чтобы чем-то отличался от первоначального варианта.так-же ищет дубли только для одной активной ячейки на которую щёлкал мышкой в начале выделения…

{quote}Чтобы снимать выделение перед поиском (вдуг дубликатов уже нет) вставьте строку ActiveCell.Interior.Pattern = False (см 2-й пример){/quote}
да. спасибо.

Hugo

Пользователь

Сообщений: 23253
Регистрация: 22.12.2012

Я бы такой алгоритм применил —
1. цикл по листам (исключая текущий)
2. UsedRange столбца B в массив, его в словарь. Словарь один на все листы.
3. Работа с выделенным (если много, то в массив, если нет — то прямо с листа можно) — сверяемся с словарём и красим.

Так будет быстро, т.к. переборов данных листов = количеству_листов, а не количество_выделенных_ячеек * количество_листов.

nerv

Пользователь

Сообщений: 3071
Регистрация: 22.12.2012

Почти тоже самое, о чем говорил Hugo

Sub io()
Dim x, objSheet As Object, objRange As Object, objDict As Object
Set objRange = Selection
Set objDict = CreateObject(«Scripting.Dictionary»)
For Each x In objRange.Cells
If x <> «» Then objDict.Item(CStr(x)) = x
Next
For Each objSheet In Worksheets
If Not objSheet Is ActiveSheet Then
For Each x In objSheet.Range(objRange.Address).Cells
If objDict.Item(CStr(x)) Then x.Interior.ColorIndex = 6
Next
End If
Next
End Sub

p.s.: выделять ТОЛЬКО ячейки

grooogler

Пользователь

Сообщений: 20
Регистрация: 01.01.1970

ничего не понял что писал Hugo если честно)

но первые варианты мне как-то больше понравились. точнее — они работают. если бы ещё на вопросы ответить которые я писал и подкорректировать что говорил…

>nerv
ну, как то мягко говоря не пашит. не понятно почему, что-то находит что-то нет. а если и находит, то выделяет не повторяющуюся ячейку из тех что я выделил, а в другом месте — где нашелся дубль. я должно быть необорот) ну и собственно… что главное что собственно и не очень то пашит

Hugo

Пользователь

Сообщений: 23253
Регистрация: 22.12.2012

Я иначе думал — вроде в выделенном красить заказывали.
Тогда такие варианты кода Nerv (самому писать лениво
первый вариант хуже, т.к. красит столько раз, сколько листов проверяет, второй красит только один раз, как я выше описал.
Вот только в колонки B прогоняет на всю высоту, а не только до последней занятой — это можно дополнительно пофиксить, но это не существенно — в большинстве случаев это и будет UsedRange:

Sub io2()
Dim x, objSheet As Object, objRange As Object, objDict As Object, i As Long
Set objRange = Selection
Set objDict = CreateObject(«Scripting.Dictionary»)
For Each x In objRange.Cells
i = i + 1
If x <> «» Then objDict.Item(CStr(x)) = i
Next
For Each objSheet In Worksheets
If Not objSheet Is ActiveSheet Then
For Each x In objSheet.UsedRange.Columns(2).Cells
If objDict.Item(CStr(x)) Then objRange(objDict.Item(CStr(x))).Interior.ColorIndex = 6
Next
End If
Next
End Sub

Sub io3()
Dim x, objSheet As Object, objRange As Object, objDict As Object
Set objRange = Selection
Set objDict = CreateObject(«Scripting.Dictionary»)

For Each objSheet In Worksheets
If Not objSheet Is ActiveSheet Then
For Each x In objSheet.UsedRange.Columns(2).Cells
If x <> «» Then objDict.Item(CStr(x)) = x
Next
End If
N

Hugo

Пользователь

Сообщений: 23253
Регистрация: 22.12.2012

упс, недокопипастил

Sub io3()
Dim x, objSheet As Object, objRange As Object, objDict As Object
Set objRange = Selection
Set objDict = CreateObject(«Scripting.Dictionary»)

For Each objSheet In Worksheets
If Not objSheet Is ActiveSheet Then
For Each x In objSheet.UsedRange.Columns(2).Cells
If x <> «» Then objDict.Item(CStr(x)) = x
Next
End If
Next

For Each x In objRange.Cells
If objDict.Item(CStr(x)) Then x.Interior.ColorIndex = 6
Next

End Sub

Hugo Пользователь Сообщений: 23253 Регистрация: 22.12.2012	Проверку по словарю можно так написать — так понятнее, и вероятно правильнее: If objDict.exists(CStr(x)) Then x.Interior.ColorIndex = 6

Hugo

Пользователь

Сообщений: 23253
Регистрация: 22.12.2012

Так подшлифовал (вроде даже комментарии не нужны):

Sub io4()
Dim x, objSheet As Object

With CreateObject(«Scripting.Dictionary»)

For Each objSheet In Worksheets
If Not objSheet Is ActiveSheet Then
For Each x In objSheet.UsedRange.Columns(2).Cells
If CStr(x.Value) <> «» Then .Item(CStr(x.Value)) = 1
Next
End If
Next

For Each x In Selection.Cells
If .exists(CStr(x.Value)) Then x.Interior.ColorIndex = 3
Next

End With

End Sub

nerv Пользователь Сообщений: 3071 Регистрация: 22.12.2012

nerv Пользователь Сообщений: 3071 Регистрация: 22.12.2012	{quote}{login=Hugo}{date=02.08.2011 12:08}{thema=}{post}Проверку по словарю можно так написать — так понятнее, и вероятно правильнее: If objDict.exists(CStr(x)) Then x.Interior.ColorIndex = 6{/post}{/quote}ну да)

Hugo

Пользователь

Сообщений: 23253
Регистрация: 22.12.2012

Такой вариант с использованием массивов.
Работает быстро, но выделять нужно столбик (не несколько столбцов), т.к. порядок перебора массива не сопадает с порядком перебора Selection, и поэтому Selection(i) будет врать, если выделено несколько строк в нескольких столбцах.

Sub io5()
Dim a, x, objSheet As Object, i&

With CreateObject(«Scripting.Dictionary»)

For Each objSheet In Worksheets
If Not objSheet Is ActiveSheet Then
a = objSheet.UsedRange.Columns(2).Value
For Each x In a
If x <> «» Then .Item(CStr(x)) = 1
Next
End If
Next

a = Selection.Value
For Each x In a
i = i + 1
If .exists(CStr(x)) Then Selection(i).Interior.ColorIndex = 3
Next

End With
End Sub

Hugo

Пользователь

Сообщений: 23253
Регистрация: 22.12.2012

{quote}{login=nerv}{date=02.08.2011 12:24}{thema=}{post}так?{/post}{/quote}
Красиво, лаконично. Без словарей и массивов
Только зачем перебирать остальные листы, если 11111 уже покрашено?
Исправишь — уже не так красиво будет
Кстати, как исправлять будешь? У меня есть мысль, но не скажу

Hugo

Пользователь

Сообщений: 23253
Регистрация: 22.12.2012

Ладно, покажу мысль. Думал, другой вариант посмотреть — вдруг что-то короче придумается…
Листы перебираются всегда, но их содержимое только до тех пор, пока ячейка не покрашена:

Sub io()
Dim x, i, objSheet As Object, flag As Boolean
For Each x In Selection.Cells
flag = True
For Each objSheet In Worksheets
If flag Then
If Not objSheet Is ActiveSheet Then
For Each i In objSheet.UsedRange.Columns(Selection.Column).Cells
If x = i Then x.Interior.ColorIndex = 6: flag = False: Exit For
Next
End If
End If
Next
Next
End Sub

Но на словарях/массивах конечно быстрее — там по одному перебору всех диапазонов происходит (т.е. один раз второй столбец каждого другого листа, потом один раз Selection), а тут на каждую ячейку Selection перебираются все ячейки колонки выделения всех листов, пока не будет совпадения. Т.е. если Selection например 1000 ячеек и в книге 11 листов, то переберутся столбцы выделенного столбца 10000 листов, и чем меньше будет совпадений, тем дольше процесс.

nerv

Пользователь

Сообщений: 3071
Регистрация: 22.12.2012

Hugo, я бы ответил раньше, но обед … ням : )

Привет Ассемблер, Финт ушами)
Sub io()
Dim x, objSheet As Object
For Each x In Selection.Cells
For Each objSheet In Worksheets
If Not objSheet Is ActiveSheet Then
For Each i In objSheet.UsedRange.Columns(Selection.Column).Cells
If x = i Then x.Interior.ColorIndex = 6: GoTo L1
Next
End If
Next
L1: Next
End Sub

Hugo Пользователь Сообщений: 23253 Регистрация: 22.12.2012	я ещё не обедал Говорят, GoTo не по феншую… Но тут похоже на феншуй

nerv Пользователь Сообщений: 3071 Регистрация: 22.12.2012	Hugo: «Говорят, GoTo не по феншую…» Все зависит от обстоятельств. В данном случае, те кто говорил, ошибались)

GIG_ant Пользователь Сообщений: 3102 Регистрация: 24.12.2012	{quote}{login=nerv}{date=02.08.2011 03:02}{thema=}{post} Все зависит от обстоятельств. В данном случае, те кто говорил, ошибались){/post}{/quote} Может я ошибаюсь в предполжении, но что мешает, в вашем случае: Goto — заменить на Exit For и убрать метку L1.

GIG_ant Пользователь Сообщений: 3102 Регистрация: 24.12.2012	Не усмотрел еще одно Next, вопрос снимаю ))

Hugo Пользователь Сообщений: 23253 Регистрация: 22.12.2012	GIG_ant, так уже было — мне не понравилось А если серъёзно — так выйдем из цикла по текущему листу. Но если ещё 99 листов не просмотрено?

Hugo Пользователь Сообщений: 23253 Регистрация: 22.12.2012	Поздно, я уже ответ написал

grooogler

Пользователь

Сообщений: 20
Регистрация: 01.01.1970

так, а давайте всё таки доделаем всё это в практическом плане а?))

пробую

вот этот. остальные что-то не пашут.

1. как в этот код добавить чтобы он перед поиском — убирал Цвет ячеек с выделенных акков?
2. чтобы дубли пустых ячеек не искал (если выделена пустая ячейка)
3. красный цвет чтоб был ане жёлтый.

nilem

Пользователь

Сообщений: 837
Регистрация: 23.12.2012

Для примера:

Sub ioio()
If IsEmpty(Selection) Then MsgBox «Пустая ячейка», 64: Exit Sub
If Selection.Columns.Count > 1 Then MsgBox «Выделено более 2 столбцов», 64: Exit Sub
Dim r As Range, i As Range, wsh As Worksheet, clmn As Long
clmn = Selection.Column: If clmn <> 2 Then MsgBox «Выделяем только 2-й столбец», 64: Exit Sub
ActiveSheet.Columns(clmn).Interior.Color = xlNone
For Each wsh In Worksheets
If Not wsh Is ActiveSheet Then
For Each i In wsh.UsedRange.Columns(2).Cells
For Each r In Selection.Cells
If Len® Then If r = i Then r.Interior.Color = vbYellow
Next
Next
End If
Next
End Sub

Hugo Пользователь Сообщений: 23253 Регистрация: 22.12.2012	Как это не пашут? А вот этот, на словаре и массивах, проверяли?

grooogler Пользователь Сообщений: 20 Регистрация: 01.01.1970	#30 02.08.2011 23:05:02 nilem спасибо вроде всё как надо. такая только деталь… если я щёлкаю на заголовок столбца B, то соответственно выделяются все ячейки столбца… до самого низа на тысячи строк… а у меня заполнено только строки до 800-й… ну и когда я запускают поиск… макрос ищет дубли для всех этих тысяч строк… а точнее — попросту виснет. можно сделать какую-нибудь проверку… примерно таким образом — если выделена пустая ячейка — то для неё дубли не ищутся (как сейчас реализовано), и мы идём дальше… но, дальше мы в таком случае идём только в том случае если далее есть не пустые выделенные ячейки. вот примерно таким образом. доходим до пустой йчейки, проверяем есть ли за неё ещё что-то не пустое, и если далее всё пусто — останавливаемся

Источник

In this article, we will look into how we can use the VLOOKUP to find duplicate values in Excel.

To do so follow the below steps:

Let’s make two columns of different section to check VLOOKUP formula on columns:

Created Two Columns

Here is the formula we are going to use:

=VLOOKUP(List1,List2,TRUE,FALSE)

In this formula, the List-1 names will be searched in List-2. If there exists any duplicate name, the formula will return the name from List-1. Let`s look closely at our example for better clarification.
In C2 we will write this formula =VLOOKUP(A2:A10,B2:B10,TRUE,FALSE) and then press enter.

Now, we will see this result:

Here Himesh is duplicate value

Here the Himesh is found because the VLOOKUP function searches this name from Section A to Section B. When the same name is found it will output the result from Section A.
Now drag the list and see all values.

Here we drag the formulated Cells

The #N/A results are found because, in those particular cells, the names from column A are not found in column B.
In the Result column, you’re seeing a total of 2 duplicate values ( Himesh, Pragya). #N/A values are representing the unique values of column Section A.

Using VLOOKUP to find duplicate values in two Excel worksheets

We can also use the VLOOKUP to find duplicate values between two Excel worksheets. To do so follow the below steps:

Make two excel workbooks Section A and Section B.

Two Workbooks

In the B2 of Section B type the below code and press enter:-

=IF(ISERROR(VLOOKUP(A2,'Section A'!A1:A10,1,0)),"Unique","Duplicate")

Section A and Section B on different workbooks

Using VLOOKUP to find duplicates in two Workbooks of Excel

We can also use the VLOOKUP to find duplicate values between two Excel workbooks. To do so follow the below steps:

Now we create a new Section A in a new Workbook with different values.

New Workbook

And In our main workbook which we were working (in our last example), create another worksheet titled Sheet 1 and again create a list of products.

Another workbook named Sheet1

Now in cell C2 of Sheet1, write down the following formula and press enter.

=IF(ISERROR(VLOOKUP(B2,[VL]Section A!$A$2:$A$10,1,0)),"Unique", "Duplicate")

You will get the result as Unique because value does not exist in Section A.

Result

Now Drag Down the formulated cell to see out the result of the whole column.

Источник