Как сравнить файлы в excel

Порядок

Сравнение двух версий книги с помощью средства сравнения электронных таблиц

Если другие пользователи имеют право на редактирование вашей книги, то после ее открытия у вас могут возникнуть вопросы "Кто ее изменил? И что именно изменилось?" Средство сравнения электронных таблиц от Майкрософт поможет вам ответить на эти вопросы — найдет изменения и выделит их.

Важно: Spreadsheet Compare is only available with Office профессиональный плюс 2013, Office профессиональный плюс 2016, Office профессиональный плюс 2019, or Приложения Microsoft 365 для предприятий.

Откройте средство сравнения электронных таблиц.

В левой нижней области выберите элементы, которые хотите включить в сравнение книг, например формулы, форматирование ячеек или макросы. Или просто выберите вариант Select All (Выделить все).

На вкладке Home (Главная) выберите элемент Compare Files (Сравнить файлы).

В диалоговом окне "Сравнение файлов" в строке " " выберите более ранжную версию книги. Помимо выбора файлов, сохраненных на компьютере или в сети, можно также ввести веб-адрес, ведущий к книге, сохраненной на сайте.

В диалоговом окне "Сравнение файлов" в строке "С" до нужной версии.

Примечание: Можно сравнивать два файла с одинаковыми именами, если они хранятся в разных папках.

Нажмите кнопку ОК, чтобы выполнить сравнение.

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

Результаты сравнения отображаются в виде таблицы, состоящей из двух частей. Книга в левой части соответствует файлу, указанному в поле "Compare" (Сравнить), а книга в правой части — файлу, указанному в поле "To" (С чем). Подробные сведения отображаются в области под двумя частями таблицы. Изменения выделяются разными цветами в соответствии с их типом.

Результаты сравнения

Интерпретация результатов

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

Если содержимое не умещается в ячейках, выберите команду Resize Cells to Fit (Размер ячеек по размеру данных).

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

Другие способы работы с результатами сравнения

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

Вы можете экспортировать результаты в файл Excel, более удобный для чтения. Выберите Home > Export Results (Главная > Экспорт результатов).

Чтобы скопировать результаты и вставить их в другую программу, выберите Home > Copy Results to Clipboard (Главная > Копировать результаты в буфер обмена).

Чтобы отобразить форматирование ячеек из книги, выберите Home > Show Workbook Colors (Главная > Показать цвета книги).

Другие причины для сравнения книг

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

Средство сравнения электронных таблиц можно использовать не только для сравнения содержимого листов, но и для поиска различий в коде Visual Basic для приложений (VBA). Результаты отображаются в окне таким образом, чтобы различия можно было просматривать параллельно.

Как сравнить два файла в excel на различия

Что можно делать с средство диагностики электронных таблиц Excel для Windows

​Смотрите также​​ значений​ хромой поиск. :(​ делать отбор не​ раза укажите на​ — искать нужно​ прошу снисходительно отнестись.​ всего макрос написать​ способ занимает около​ Conditional formatting -​ сравнить значения в​ вводите соответствующее имя​ более удобный для​ которую хотите сравнить​ ячеек на листе.​ в нескольких. Это​ кнопку​Примечание:​.Item(arrA(i, 1)) =​Igor67​ числовые значения, а​

​ данные в одном​ по scripting.dictionary​ Опишу задачу: Есть​ с циклом. Что-то​ часа (да даже​ Highlight cell rules​ соседних ячейках каждой​ для диапазона и​ чтения. Выберите​ с более ранней.​Если вы используете функции​ поможет создать более​Средство сравнения электронных таблиц​ Мы стараемся как можно​

​ .Item(arrA(i, 1)) +​: Потренировался, попробуйте, может​ строковые. И мне​ листе, затем два​​Можно и написать​​ два файла Excel​​ типа такого​​ само открытие окна​ — Duplicate Values)​ строки. Как самый​

​ нажмите Enter.​​Home > Export Results​​Примечание:​ надстройки Inquire (Запрос)​ четкую картину зависимостей​на экране​

Сравнение двух книг

​ оперативнее обеспечивать вас​​ 1​​ быть подойдет.​ не совсем подходит​ раза на данные​ — только вот​ 2010, в каждом​i = 1​ фильтра в этой​

​:​ простой вариант -​Теперь воспользуемся условным форматированием,​(Главная > Экспорт результатов).​ Можно сравнивать два​ для выполнения анализа​ ваших данных от​Приложения​ актуальными справочными материалами​p = p​ПыСы первый раз​ то, что в​

Результаты сравнения

​ во втором.​​ что делать с​​ порядка 300-500 тысяч​Do While Worksheets("Лист1").Cells(i,​ колонке занимает около​Если выбрать опцию​

​ используем формулу для​ чтобы выполнить сравнение​Чтобы скопировать результаты и​ файла с одинаковыми​ и сравнения защищенных​​ ячеек в других​​.​​ на вашем языке.​​ + 1 ‘если​​ объявил словарь, тяжело.​​ результате выводится только​

​Hugo​ обнаруженными?​​ строк, нужно сравнить​​ 1) <> ""​​ 20 минут, думаю​​Повторяющиеся​

​ сравнения значений, выдающую​ двух списков в​​ вставить их в​​ именами, если они​​ паролем книг, потребуется​​ источниках.​​В Windows 7 нажмите​​ Эта страница переведена​​ значение повторилось, то​​ Hugo, не посмотришь​​ значения из колонок​: Проверил — можно​​Только не говорите,​

​ эти два файла​If Worksheets("Лист1").Cells(i, 1)​ потому что в​, то Excel выделит​ на выходе логические​ Excel. Нам нужно​

Анализ книги

​ другую программу, выберите​​ хранятся в разных​​ добавить пароль книги​Эта схема отображает​ кнопку​ автоматически, поэтому ее​ можно будет уменьшить​ файл, что то​ отбора, мне нужны​ выделять вместо ID​ что нужно их​ по значениям одного​ = Worksheets("Лист2").Cells(i, 1)​ 500000 строк каждое​ цветом совпадения в​

Отчет об анализе книги

​ значения​ получить следующий результат:​Home > Copy Results to​

Отображение связей книги

​ в список паролей,​ связи между листами​Пуск​ текст может содержать​ конечный массив уникальных​​ много у меня​​ строки полностью.​ ячейку в пустом​ красить :)​ из столбцов (скажем​ Then ‘ Если​ значение повторяется максимум​ наших списках, если​ИСТИНА (TRUE)​​ Clipboard​Нажмите кнопку​ чтобы с помощью​ четырех различных книг​, выберите пункт​ неточности и грамматические​Else: .Add key:=arrA(i,​ переходных массивов получилось.​Тем не менее​ столбце.​

​Hugo​ по столбцу B,​ названия совпали​ дважды), на файле​ опцию​или​Позиции, которые есть в​(Главная > Копировать результаты​ОК​ надстройки Inquire (Запрос)​

Схема связей книги

​ с зависимостями между​Все программы​ ошибки. Для нас​ 1), Item:=1 ‘заносим​

Отображение связей листа

​ Не понял как​ весьма благодарен за​​Т.е. выделяете ячейку​​: Кстати, я недавно​ можно заранее привести​Range(Worksheets("Лист1").Cells(i, 1), Worksheets("Лист1").Cells(i,​ более 50Мб у​Уникальные​ЛОЖЬ (FALSE)​ Таблице_1, но нет​ в буфер обмена).​, чтобы выполнить сравнение.​ можно было открыть​ листами в одной​
​, а затем щелкните​ важно, чтобы эта​ значение в словарь​ по заданному значению​ помощь, возможно мне​ с данными одного​ уже ссылку давал​ файлы к одному​ 10)).Select​ меня комп повесился​- различия.​:​ в Таблцие_2 будут​Чтобы отобразить форматирование ячеек​Примечание:​

Схема связей листа

​ сохраненную копию книги.​ и той же​Microsoft Office 2013​ статья была вам​

Отображение связей ячейки

​ и указываем на​ Item вытащить Key.​ Ваша обработка поможет​ файла, затем пустую​ на файлик:​ виду). Теоретически значения​’ здесь 10​​Данные можно разместить​​Цветовое выделение, однако, не​Число несовпадений можно посчитать​ отображаться зеленым цветом.​ из книги, выберите​ Появление сообщения "Не​ Используйте команду​ книге, а также​

​,​ полезна. Просим вас​ первое повторение​Юрий М​ достичь требуемого результата,​ ячейку рядом с​ibay.narod.ru/other/DoublesRemoveTwoColumns_v6.rar​ в файле 1​ — это номер​ на листах в​ всегда удобно, особенно​ формулой:​ В тоже время​Home > Show Workbook Colors​

Схема связей ячейки

​ удается открыть книгу"​Workbook Passwords​ связями между листами​Средства Office 2013​

​ уделить пару секунд​

Очистка лишнего форматирования ячеек

​End If​: А я ещё​ попробую разобраться в​ данными, затем аналогично​Можете сразу открыть​ и файле 2,​ последнего столбца в​ одной книге, это​ для больших таблиц.​​=СУММПРОИЗВ(—(A2:A20<>B2:B20))​​ позиции, находящиеся в​(Главная > Показать цвета​ может означать, что​(Пароли книги) на​ в других книгах.​и​ и сообщить, помогла​Next i​

​ и не подступался.​​ коде. Спасибо.​ данные и пустую​ два своих файла​ этого столбца, должны​ таблице​ не принципиально, привести​ Также, если внутри​или в английском варианте​ Таблице_2, но отсутствующие​

​ книги).​ книга защищена паролем.​ вкладке​ Когда вы наводите​

Управление паролями

​Средство сравнения электронных таблиц​ ли она вам,​For i =​ :-)​Если кто то​ во втором файле.​ и обработать этим.​ быть одинаковы, на​With Selection.Interior​ таблицы к одинаковому​ самих списков элементы​ =SUMPRODUCT(—(A2:A20<>B2:B20))​​ в Таблице_1, будут​​Допустим, в вашей организации​ Нажмите кнопку​​Inquire​​ указатель мыши на​ 2013​ с помощью кнопок​ 1 To UBound(arrB)​Hugo​ ещё что нибудь​

​Steel Rain​Думаю, должно отработать​ практике возможны расхождения,​.ColorIndex = 4​ виду тоже, вся​ могут повторяться, то​Если в результате получаем​

​ подсвечены синим цветом.​

Сравнение двух версий книги с помощью средства сравнения электронных таблиц

​ ожидается аудиторская проверка.​ОК​(Запрос), чтобы добавить​ узел схемы, например​.​ внизу страницы. Для​ ‘данные другого столбца​: Вот тут не​ может посоветовать в​: Привел файлы к​ быстро. Если попробуете​ которые и требуется​ ‘ Эта строчка​ проблема в объеме​

​ этот способ не​​ ноль — списки​Выделите диапазон первой таблицы:​ Вам нужно проследить​и введите пароль.​ пароли, которые будут​

​ на страницу с​Подробнее о средстве сравнения​

​ удобства также приводим​If .exists(arrB(i, 1))​ понял:​ плане решения данной​ одному виду, т.е.​ — расскажите :)​ обнаружить. Т.е. нужно​​ красит всю строку​​ файлов. Подскажите пожалуйста​

​ подойдет.​​ идентичны. В противном​​ A2:A15 и выберите​​ данные в важных​​ Узнайте подробнее о​

​ сохранены на компьютере.​​ именем "Запад", появляется​​ электронных таблиц и​ ссылку на оригинал​​ Then​​For i =​ задачи, так же​​ колонка с требуемыми​Steel Rain​ найти все уникальные​ в зеленый цвет​ какой нибудь алгоритм,​В качестве альтернативы можно​ случае — в​ инструмент: «ГЛАВНАЯ»-«Условное форматирование»-«Создать​

​ книгах, в которых​​ том, как действуют​​ Эти пароли шифруются​ выноска со сведениями.​​ сравнении файлов можно​​ (на английском языке).​.Item(arrB(i, 1)) =​​ 1 To UBound(arrB)​ буду признателен.​ данными для отбора​

​: Объясните пожалуйста логику​​ значения в файле​.Pattern = xlSolid​ который не сутки​ использовать функцию​ них есть различия.​

​ правило»- «Использовать формулу​​ показаны изменения по​​ пароли при использовании​

​ и доступны только​​Подробнее об этом можно​ узнать в статье​Предположим, что вы хотите​ .Item(arrB(i, 1)) +​If .exists(arrA(i, 1))​​Hugo​​ — столбец А,​ процесса, для чего​ 1, которых нет​End With​ будет работать.​СЧЁТЕСЛИ​

​ Формулу надо вводить​ для определения форматированных​ месяцам и по​ средства сравнения электронных​ вам.​ узнать в статье​ Сравнение двух версий​ Сравнение версий книги,​ 1​ Then​: Для строк полностью​ затем столбец Б​ выделять по две​ в файле 2​End If​P.S. поиском по​(COUNTIF)​

Результаты сравнения

Интерпретация результатов

​ как формулу массива,​ ячеек:».​ годам. Это поможет​ таблиц.​Подробнее об использовании паролей​ Просмотр связей между​ книги.​ анализ книги для​p = p + 1​Что-то не то​ нужно писать другой​

​ пустой. Выделяю в​ ячейки? Мне нужно​ и, соответственно, наоборот.​​i = i + 1​​ форуму воспользовался как​из категории​

​ т.е. после ввода​В поле ввода введите​ вам найти и​Результаты сравнения отображаются в​ для анализа книг​ листами.​Команда​ проблемы или несоответствия​Else: .Add key:=arrB(i,​ :(​ код — этот​ первом файле первую​ сравнить в двух​ (если будет проще​Loop​ смог, опробовал то​

Другие способы работы с результатами сравнения

​Статистические​ формулы в ячейку​ формулу:​ исправить ошибки раньше,​ виде таблицы, состоящей​ можно узнать в​Чтобы получить подробную интерактивную​Workbook Analysis​ или Просмотр связей​ 1), Item:=1​Вообще я сейчас​ такой какой есть.​ ячейку из стобца​ файлах (ну или​ или быстрее работать,​

​Если надо, чтобы​ что нашел, но​, которая подсчитывает сколько​ жать не на​​Щелкните по кнопке «Формат»​​ чем до них​

​ из двух частей.​ статье Управление паролями​ схему всех ссылок​​(Анализ книги) создает​ между книг или​​End If​ в деталях не​

​Но в Вашем​ А и первую​​ на двух листах​​ то можно разместить​ совпали не только​

Другие причины для сравнения книг

​ не смог быстро​ раз каждый элемент​Enter​ и на вкладке​ доберутся проверяющие.​ Книга в левой​ для открытия файлов​ от выбранной ячейки​ интерактивный отчет, отображающий​ листов. Если на​Next i​ помню тот код,​

​ примере ведь нет​ из столбца Б.​ книги) одну колонку​ данные не в​ названия но и,​ разобраться с VBA,​ из второго списка​, а на​ «Заливка» укажите зеленый​Средство сравнения электронных таблиц​ части соответствует файлу,​ для анализа и​

Сравнение двух таблиц в Excel на совпадение значений в столбцах

​ на ячейки в​ подробные сведения о​ вашем компьютере установлен​’вычисляем размер итогового​ но там я​ строк полностью :)​ Во втором файле​ и скопировать уникальные​ разных файлах, а​ например, размеры, записанные​ а решение нужно​ встречался в первом:​

GeekBrains

Сравнение двух столбцов на совпадения в Excel

​Ctrl+Shift+Enter​ цвет. На всех​ можно использовать не​ указанному в поле​ сравнения.​ других листах или​ книге и ее​ Office профессиональный плюс​ массива​ как-то делал за​

Рабочий лист с таблицами.

​А без реального​ так же. Результат​ значения в другой​ на страницах одной​ во 2 столбец,​

  1. ​ срочно. Заранее признателен.​Полученный в результате ноль​
  2. ​.​ окнах жмем ОК.​ только для сравнения​
  3. ​ "Compare" (Сравнить), а​К началу страницы​ даже в других​ структуре, формулах, ячейках,​ 2013 или более​

Результат.

​p = .Count​ много проходов по​ примера (на 10​ обработки — пустая​ файл (либо на​ книги).​

Таблица_2.

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

поле имен.

​ — p ‘+​ словарям, чтоб из​ строк например) полностью​ таблица. Хотя визуально​ другой лист).​

​Пробовал решить данную​

​If Worksheets("Лист1").Cells(i, 1)​: Через ф-цию ВПР​ отличиях.​ надо что сделать,​ C2:C15 и снова​ и для поиска​ части — файлу, указанному​ право на редактирование​Связи ячейки​

  1. ​ На рисунке ниже​ средство диагностики электронных​ 1​ кучи совпадений осталось​ рабочий код вряд​ видно, что расхождения​Создать правило.
  2. ​По запросу Вашей​ задачу следующим способом:​введите формулу.
  3. ​ = Worksheets("Лист2").Cells(i, 1)​ и автофильтр.​И, наконец, "высший пилотаж"​ то подойдет другой​ выберите инструмент: «ГЛАВНАЯ»-«Условное​Заливка.
  4. ​ различий в коде​ в поле "To"​ вашей книги, то​. Такие связи с​ показана очень простая​ таблиц доступна в​Использовать формулу.
  5. ​’определяем его​ одно без пары.​СЧЕТЕСЛИ.
  6. ​ ли получите.​ в файлах есть.​ обработки я выделил​ объединял обе таблицы​ Then ‘ Если​

Пример.

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

​Чтобы автофильтр не​ — можно вывести​ быстрый способ: выделите​ форматирование»-«Создать правило»- «Использовать​ Visual Basic для​ (С чем). Подробные​ после ее открытия​ другими ячейками могут​ книга, которая содержит​ Microsoft Excel.​ReDim arrRezalt(1 To​Например, если в​Ну и если​Steel Rain​ 1 ячейку нужного​ в один файл​ названия совпали​ тормозил на 500​

​ отличия отдельным списком.​ оба столбца и​

​ формулу для определения​ приложений (VBA). Результаты​ сведения отображаются в​ у вас могут​ существовать в виде​ две формулы и​Чтобы выполнить все эти​ p, 1 To​ одном списке две​ вытянутых данных немного​: Алгоритм работы Вашего​ мне столбца в​ одну под другой,​

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

​If Worksheets("Лист1").Cells(i, 2)​ тыс.строк, от формул​ Для этого придется​ нажмите клавишу​ форматированных ячеек:».​ отображаются в окне​ области под двумя​ возникнуть вопросы "Кто​ формул или ссылок​ подключения данных к​

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

​ и другие задачи,​ 1)​ единицы, а во​ — то ведь​ модуля объясните пожалуйста.​ первом файле, и​ потом делал Условное​ = Worksheets("Лист2").Cells(i, 2)​ нужно будет избавиться.​ использовать формулу массива:​F5​В поле ввода введите​​ таким образом, чтобы​​ частями таблицы. Изменения​​ ее изменил? И​​ на именованные диапазоны.​

Как сравнить два файла вȎxcel на различия

​ базе данных Access​ вы можете использовать​

​ втором одна, то​ по ним можно​

​Steel Rain​ 1 ячейку во​ форматирование-Правила выделения ячеек-Повторяющиеся​ Then ‘ И​Для этого скопировать​Выглядит страшновато, но свою​, затем в открывшемся​ формулу:​ различия можно было​ выделяются разными цветами​​ что именно изменилось?"​​ Схема может пересекать​​ и текстовому файлу.​​ команды на вкладке​

​For Each x​ код покажет, что​ формулами подтянуть остальное​: а, ещё, пардонте,​ втором. По второму​ значения и далее​​ размеры тоже совпали​​ весь столбец C​ работу выполняет отлично​​ окне кнопку​​Щелкните по кнопке «Формат»​​ просматривать параллельно.​ в соответствии с​​ Средство сравнения электронных​ листы и книги.​Подробнее об этом можно​​Inquire​ In .keys ‘начинаем​ не совпадает одна​ из тех строк.​​ забыл уточнить, значения​​ запросу 2-ую ячейку​

Как сравнить два файла вȎxcel на различия

​ в этой колонке​Range(Worksheets("Лист1").Cells(i, 1), Worksheets("Лист1").Cells(i,​ в буфер обмена,​ ;)​

  • ​Выделить (Special)​ и на вкладке​
  • ​У нас имеется две​​ их типом.​
  • ​ таблиц от Майкрософт​В данной схеме отображаются​ узнать в разделе​​(Запрос). Вкладка​
  • ​ перебор данных в​ единица первого списка.​С помощью ВПР()​​ в ячейках по​ в том же​ фильтр по цвету​ 10)).Select​ правый клик >>​
  • ​Steel Rain​
Вариант 2. Перемешанные списки

​-​ «Заливка» укажите синий​ таблицы заказов, скопированных​В двух расположенных рядом​ поможет вам ответить​ два уровня связей​

​ Анализ книги.​Inquire​ словаре по ключам​Ну а по​ или индекса с​ которым нужен отбор​ столбце в первом​​ заливки. На файле​’ здесь 10​ специальная вставка >>​: Доброго всем времени​Отличия по строкам (Row​ цвет. На всех​ в один рабочий​​ частях таблицы сравнивается​

Как сравнить два файла вȎxcel на различия

​ на эти вопросы —​​ ячейки для ячейки​​К началу страницы​(Запрос) ленты Excel​If .Item(x) =​ итему думаю кей​​ поискпозицией :)​​ строковые​

​ файле и 2-ую​ в 8Мб данный​ — это номер​ значения.​ суток.​ differences)​ окнах жмем ОК.​ лист. Необходимо выполнить​

​ каждый лист из​ найдет изменения и​​ A10 на листе​ ​В книгах, связанных с​​ содержит кнопки для​​ 1 Then ‘если​​ не получить без​То, что там​Hugo​ во втором. Получил​

Как сравнить два файла вȎxcel на различия

​ способ занимает около​ последнего столбца в​Похожая тема:​

​Сразу скажу, практически​. В последних версиях​При определении условий для​ сравнение данных двух​ обоих файлов, начиная​

Как сравнить два файла вȎxcel на различия

​ выделит их.​ 5 в книге​ другими книгами с​

Сравнить два больших файла на уникальные значения в строках

​ описанных ниже команд.​​ данный ключ повторился​ перебора. Мне никогда​
​ строки — роли​: Ну а на​ результат: Данные stf_ctf2_01082012-31082012.xlsx​ часа (да даже​ таблице​Поиск неповторяющихся значений​ впервые пользуюсь пакетом​ Excel 2007/2010 можно​ форматирования ячеек столбцов​ таблиц в Excel​ с самого крайнего​Важно:​ "Книга1.xlsx". Эта ячейка​ помощью ссылок на​Если вкладка​ 1 раз, заносим​ такое и не​ не играет. Должно​ Вашем приложенном файле​ Суммы stf_ctf2_01082012-31082012.xlsx Данные​ само открытие окна​With Selection.Interior​Все имена заняты​ MS Office, поэтому​ также воспользоваться кнопкой​ мы использовали функцию​ и проверить, которые​ слева. Если лист​ Средство сравнения электронных​ зависит от ячейки​ другие ячейки, можно​Inquire​ номер в итоговый​ надо было :)​ всё равно находить​
​ расхождение показывает? У​ stf_ctf2_01082012-31082012.xlsx Суммы stf_ctf2_01082012-31082012.xlsx​ фильтра в этой​.ColorIndex = 4​: Попробовал сделать себе​ прошу снисходительно отнестись.​Найти и выделить (Find​ СЧЕТЕСЛИ. В данном​ позиции есть первой​ в книге скрыт,​ таблиц доступно только​ C6 на листе​ запутаться. Используйте​(Запрос) не отображается​ массив​Hugo​ отличия — может​ меня находит -​ЧЯДНТ?​ колонке занимает около​ ‘ Эта строчка​ файл на 500тыс.​ Опишу задачу: Есть​ & Select) -​
​ примере эта функция​ таблице, но нет​ он все равно​ с версиями Office​ 1 в другой​схему связей книги​ на ленте Excel,​i = i + 1​: Тем более что​ быть их нет​ и если два​
​Steel Rain​ 20 минут, думаю​ красит всю строку​ строк.​ два файла Excel​ Выделение группы ячеек​ проверяет сколько раз​ во второй. Нет​

​ отображается и сравнивается​​ профессиональный плюс 2013 и​ книге — "Книга2.xlsx" и​
​для создания интерактивной​ см. раздел Включение​arrRezalt(i, 1) =​ итемы могут быть​
​ (позиция роли не​ раза данные указывать,​: Ещё раз попробовал​ потому что в​ в зеленый цвет​При таком количестве​
​ 2010, в каждом​
​ (Go to Special)​

​ встречается значение второго​​ смысла вручную сравнивать​ в средстве сравнения​ Office 365 профессиональный плюс.​
​ влияет на несколько​ графической карты зависимостей,​ надстройки Inquire (Запрос).​ x​

​ одинаковые у разных​​ играет)?​ и если данные​ запустить предложенную обработку,​

​ 500000 строк каждое​​.Pattern = xlSolid​ строк способ выше,​ порядка 300-500 тысяч​на вкладке​

Люди подскажите пожалуйста, как в двух файлах excel найти совпадения. помогите очень нужно.

​ аргумента (например, A2)​ значение каждой ячейки.​ электронных таблиц.​Откройте средство сравнения электронных​ ячеек на других​ образованных соединениями (ссылками)​Команда​End If​ ключей!​А в коде​ и пустой столбец.​ выбрал в первом​

​ значение повторяется максимум​​End With​ увы, не прокатывает.​ строк, нужно сравнить​Главная (Home)​ в списке первого​Как сделать сравнение значений​Если содержимое не умещается​
​ таблиц.​ листах в том​ между файлами. Типы​Compare Files​Next x​Igor67​ не разберётесь -​
​Алгоритм точно уже​ диапазоне первую ячейку​ дважды), на файле​End If​
​ Был не прав​
​ эти два файла​Excel выделит ячейки, отличающиеся​
​ аргумента (например, Таблица_2).​ в Excel двух​ в ячейках, выберите​В левой нижней области​
​ же файле.​ ссылок в схеме​
​(Сравнить файлы) позволяет​End With​: Спасибо за отклики.​ он закрыт :(​
​ не помню, но​
​ нужной колонки в​ более 50Мб у​End If​Все имена заняты​
​ по значениям одного​
​ содержанием (по строкам).​
​ Если количество раз​
​ столбцов? Для решения​
​ команду​
​ выберите элементы, которые​Подробнее о просмотре связей​ могут включать другие​ просмотреть различия между​’выгружаем данные на​ Игорь, там где​
​Hugo​ там исключаются все​ первом файле, во​ меня комп повесился​
​Примерно так​: Если в обоих​ из столбцов (скажем​ Затем их можно​
​ = 0 в​ данной задачи рекомендуем​
​Resize Cells to Fit​ хотите включить в​ ячейки можно узнать​ книги, базы данных​
​ двумя книгами по​
​ лист​ не понял это​: Для проверки попробуйте​ парные значения (с​
​ втором диапазоне пустую​
​ :(​
​Alex ivanov​
​ файлах шестизначные числа,​
​ по столбцу B,​

​ обработать, например:​​ таком случае формула​

​ использовать условное форматирование,​​(Размер ячеек по​ сравнение книг, например​ в статье Просмотр​ Access, текстовые файлы,​ ячейкам. Чтобы выполнить​Лист3.[d1].Resize(p).Value = arrRezalt()​ просто косяк:) Вчера​ поменять в одном​ учётом даты или​
​ ячейку в первом​Данные можно разместить​: выдели. и. подготовить. свойства. ​ то вариант макросом.​
​ можно заранее привести​залить цветом или как-то​ возвращает значение ИСТИНА.​ которое быстро выделить​ размеру данных).​ формулы, форматирование ячеек​ ссылок между ячейками.​
​ HTML-страницы, базы данных​
​ эту команду, нужно​End Sub​ не смог перебрать​ файле пару значений​ ID), оставшиеся собираются​

Сравнить два больших файла на уникальные значения в строках

​ файле. В третьем​​ на листах в​Oaobv​

​kuklp​ файлы к одному​ еще визуально отформатировать​ В таком случае​ цветом позиции, находящиеся​Различия разного типа выделяются​ или макросы. Или​К началу страницы​ SQL Server и​ открыть две книги​Hugo​ пары ключ-значение в​ — в итоге​ в новую книгу.​ диапазоне первую ячейку​ одной книге, это​: Да проще можно!​: Интересное решение. Но​ виду). Теоретически значения​очистить клавишей​ ячейке присваивается пользовательский​ только в одном​ с помощью цвета​ просто выберите вариант​Если книга при открытии​ другие источники данных.​ в Excel.​: Да, так должно​ словаре. Сегодня получилось.​ должно найтись по​Т.е. если в​ во втором файле,​ не принципиально, привести​ Но для удобного​ все это можно​
​ в файле 1​Delete​ формат, указанный в​ столбце. Рабочий лист​ заливки ячейки или​Select All​ медленно загружается или​ В схеме связей​Результаты сравнения выделяются цветом​ сработать.​ Кажется делал то​ два отличия на​ одном столбце будет​ во втором пустую​ таблицы к одинаковому​ сравнения нужно, чтобы​ ускорить больше чем​ и файле 2,​заполнить сразу все одинаковым​ параметрах условного форматирования.​ с таблицами:​ цвета шрифта текста.​(Выделить все).​ ее размер становится​ вы можете выбирать​
​ по типу содержимого,​p можно не​ же что и​ каждой стороне.​1​ ячейку во втором​ виду тоже, вся​ структура таблиц была​ в 20 раз:-)​ этого столбца, должны​ значением, введя его​

​Скачать пример сравнения 2​В первую очередь необходимо​ Например, ячейки с​На вкладке​ чрезмерным, вероятной причиной​ элементы и находить​ например по введенным​ считать — просто​

​ вчера, но. Код​​Guest​2​

​ файле. Получил на​​ проблема в объеме​ полностью одинакова (это​есть 2 файла excel.​ быть одинаковы, на​ и нажав​ таблицы в Excel​ присвоить имена обоим​ введенными значениями (не​Home​

​ этого может быть​ о них дополнительные​ значениям, формулам, именованным​ объявляем массив размером​
​ должен быть рабочим,​: Steel Rain!​3​ выходе колонку со​
​ файлов. Подскажите пожалуйста​ и вам нужно,​ В обоих перечислины​

​ практике возможны расхождения,​​Ctrl+Enter​Ссылка во втором аргументе​ таблицам. Благодаря этому​
​ с формулами) выделяются​
​(Главная) выберите элемент​ форматирование строк или​ сведения, а также​
​ диапазонам и форматам.​ со словарь, а​ без проверок на​

​Если вопрос актуален,​​а во втором​ всеми значениями из​ какой нибудь алгоритм,​ так как иначе​ названия деталей, их​ которые и требуется​удалить все строки с​ относительная, значит по​ легче понять, какие​ заливкой зеленого цвета​Compare Files​ столбцов, о котором​
​ перетаскивать линии соединения​ Имеется даже окно,​ после его заполнения​ ошибочные данные или​ укажите E-mail для​1​ двух файлов (не​ который не сутки​ возмножны дубли данных​ очень много! в​ обнаружить. Т.е. нужно​ выделенными ячейками, используя​ очереди будут проверятся​ сравниваются диапазоны ячеек:​ в расположенных рядом​
​(Сравнить файлы).​

​ вы даже не​​ для изменения формы​ в котором построчно​ выгружаем по количеству​ их отсутствие.​ отправки файла.​1​ проверял, но по​ будет работать.​ и некорректные результаты).​ этих файлах есть​ найти все уникальные​ команду​ все ячейки выделенного​Выберите инструмент «ФОРМУЛЫ»-«Определенные имена»-«Присвоить​ частях таблицы и​В диалоговом окне​ подозреваете. Используйте команду​ схемы.​ могут отображаться изменения​ i (это ведь​Sub getUniq() ‘извлечение​Hugo​3​ виду так, судя​P.S. поиском по​

​1) Копируете списки​​ много совпадений, мне​ значения в файле​Главная — Удалить -​ диапазона (например, A2:A15).​ имя».​ шрифтом зеленого цвета​
​Compare Files​Clean Excess Cell Formatting​На схеме слева отображается​ кода VBA. Различия​ всё равно считается​
​ только уникальных записей​: Мне интересно, как​то расхождение будет​ по количеству, просто​ форуму воспользовался как​ в два столбца​ нужно сравнить эти​ 1, которых нет​ Удалить строки с​

​ Например, для сравнения​​В появившемся окне в​ в области результатов.​(Сравнение файлов) в​(Удалить лишнее форматирование​
​ текущая книга и​ между ячейками отображаются​ i = i​ (повторяются по 1​ там дела. ​2 в первом​ расхождений должно быть​

​ смог, опробовал то​​ рядом на один​ два документа по​ в файле 2​ листа (Home -​ двух прайсов в​ поле «Имя:» введите​ В левой нижней​ строке​ ячеек) для удаления​ соединения между ней​ в удобной для​ + 1).​ разу)​Юрий М​ файле и 1​ не более 100-500,​ что нашел, но​

​ лист.​​ диапазонам и совпадения​ и, соответственно, наоборот.​

​ Delete — Delete​​ Excel даже на​ значение – Таблица_1.​ части указаны условные​Compare​ лишнего форматирования и​

​ и другими книгами​​ восприятия таблице.​Т.е. пустой низ​Dim arrA(), arrB(),​: Игорь, судя по​ во втором.​ а в выходном​ не смог быстро​2) В третьем​
​ в одном из​ (если будет проще​ Rows)​ разных листах. Вторая​Левой клавишей мышки сделайте​ обозначения, поясняющие значения​(Сравнить) с помощью​
​ значительного уменьшения размера​ и источниками данных.​
​Команда​
​ остаётся невыгруженным -​
​ arrRezalt(), p&, i&,​
​ количеству однотипных тем,​
​Hugo​
​ файле более 500000​
​ разобраться с VBA,​
​ столбце пишете простейшую​
​ документов, чтобы выделялись​ или быстрее работать,​и т.д.​

​ формула действует аналогично.​​ щелчок по полю​ цветов.​ кнопки обзора​
​ файла. Это помогает​ На схеме также​Сравнить файлы​ чуть больше расход​ x​ пора завести "Уголок​

​: То, что там​​ строк).​ а решение нужно​ формулу, которая сравнивает​ каким нибуть цветом. ​ то можно разместить​Если списки разного размера​ Этот же принцип​ ввода «Диапазон:» и​Если вы хотите сохранить​выберите более раннюю​ избежать "раздувания электронной​ отображаются дополнительные уровни​сравнивает два файла​ памяти, зато код​’забираем данные в​ Hugo — сравнение​
​ строки — роли​Hugo​ срочно. Заранее признателен.​ соответствующие ячейки и​Удачник​ данные не в​ и не отсортированы​
​ можно применять для​ выделите диапазон: A2:A15.​ результаты или проанализировать​ версию книги. Помимо​ таблицы", что увеличивает​ соединений книги, предоставляя​

​ с помощью средства​​ проще.​ массив для обработки​ двух столбцов/файлов". :-)​ не играет.​
​: Тот файл разарабатывался​KuklP​ показывает, одинаково у​
​: А таблицы одинаковы?​ разных файлах, а​ (элементы идут в​ разных подобных задач.​ И нажмите ОК.​
​ их в другом​ выбора файлов, сохраненных​ скорость работы Excel.​ вам картину источников​ сравнения электронных таблиц​Но таким кодом​
​arrA = Worksheets("file1").Range("b2:b"​Hugo​Ну а пустой​

​ для сверки платёжек,​: Обращайтесь. Адрес в​ них содержимое, или​ То есть, например,​ на страницах одной​ разном порядке), то​Типовая задача, возникающая периодически​Для второго списка выполните​
​ приложении, экспортируйте их​ на компьютере или​Важно:​

​ данных для книги.​​ (Майкрософт).​ отберутся только значения,​ & Worksheets("file1").Cells(Rows.Count, 2).End(xlUp).Row).Value​: Ну тут я​ столбец лучше не​ поэтому там нужно​ подписи.​

​ нет:​​ названия деталей в​
​ книги).​ придется идти другим​ перед каждым пользователем​

​ те же действия​​ в файл Excel​ в сети, можно​

​ Перед очисткой лишнего форматирования​​Подробнее об этом можно​В Windows 10 вы​ встреченные 1 раз.​arrB = Worksheets("file2").Range("b2:b"​ ни строчки кода​

​ выбирать — выбирайте​​ выделять по две​Hugo​=IF(A3=B3;"Одинаковое";"Разное"),​
​ столбце А, размер​Пробовал решить данную​ путем.​ Excel — сравнить​ только имя присвойте​
​ или скопируйте и​ также ввести веб-адрес,​ ячейки мы рекомендуем​ узнать в статье​ можете запустить его,​ А если 3?​

​ & Worksheets("file2").Cells(Rows.Count, 2).End(xlUp).Row).Value​​ не написал :)​ оба раза столбец​
​ ячейки в каждом​: Можете оставлять значения​где А3 и​ в В, цена​ задачу следующим способом:​Самое простое и быстрое​ между собой два​ – Таблица_2. А​ вставьте в другую​

​ ведущий к книге,​​ создать резервную копию​ Просмотр связей между​ не открывая Excel.​

​KuklP​​’создаем словарь для​Но интересно, как​

​ с данными, так​ файле.​
​ и в разных​ В3 — это​

​ в С и​ объединял обе таблицы​
​ решение: включить цветовое​ диапазона с данными​ диапазон укажите C2:C15​ программу, например Microsoft​ сохраненной на сайте.​ файла, так как​ книгами.​ Для этого нажмите​: Посмотрите. Два диапазона​
​ извлечения уникальных​ сравнилось — но​ надёжнее :)​Т.е. в одном​ файлах, но код​ ячейки с одинаковыми​ т. д. ?​

​ в один файл​ выделение отличий, используя​ и найти различия​ – соответственно.​ Word. Можно также​В диалоговом окне​

​ иногда это может​​При наличии множества взаимозависимых​ кнопку​ по 500000 строк,​With CreateObject("scripting.dictionary")​

​ боюсь тема ушла​​Steel Rain​ цену и дату​ проще написать, когда​ данными из разных​И тоже самое​ одну под другой,​ условное форматирование. Выделите​ между ними. Способ​Полезный совет! Имена диапазонов​ получить более точное​Compare Files​ привести к увеличению​ листов используйте​Пуск​
​ у меня посчиало​For i =​ за предел отображаемых​: Согласен, с приведенным​
​ платежа(или ID платежа),​ значения рядом на​ списков.​
​ во второй таблице?​ потом делал Условное​
​ оба диапазона с​ решения, в данном​
​ можно присваивать быстрее​ представление каждого листа​
​(Сравнение файлов) в​ размера файла, а​
​схему связей листа​
​, введите​ за 67 сек.​
​ 1 To UBound(arrA)​ :(​ мной файлом примера​ и во втором​
​ разных листах (или​Steel Rain​
​ А можно скопировать​ форматирование-Правила выделения ячеек-Повторяющиеся​ данными и выберите​
​ случае, определяется типом​ с помощью поля​ с отображением форматирования​ строке​ отменить эти изменения​
​для создания интерактивной​Средство сравнения электронных таблиц​ Зависит от скорости​If .exists(arrA(i, 1))​Я с работы​
​ обработка выполняется и​
​ аналогично.​

​ в одном, без​: Доброго всем времени​ таблицу из 2​
​ значения и далее​ на вкладке​
​ исходных данных.​ имен. Оно находится​ ячеек, близкое к​
​To​
​ невозможно.​ графической карты соединений​
​и щелкните​
​ машины и к-ва​
​ Then ‘если значение​ её уже не​
​ выдает результат, видимо​В Вашем случае​ разницы) — так​
​ суток.​
​ книги в 1​ в этой колонке​Главная — Условное форматирование​
​Если списки синхронизированы (отсортированы),​
​ левее от строки​ тому, что вы​(С чем) с​Подробнее об этом можно​
​ (ссылок) между листами​Средство сравнения электронных таблиц​ отобранных. Можно еще​ ключ есть в​ видел, и по​ дело в том,​
​ — оба раза​
​ писанины меньше.​Сразу скажу, практически​
​ книгу на 2​
​ фильтр по цвету​
​ — Правила выделения​
​ то все делается​ формул. Просто выделяйте​
​ видите в Excel.​
​ помощью кнопки обзора​

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

​ книге, так и​В Windows 8 нажмите​ экспериментировать:-)​’считаем количество повторных​

​ — остаётся толлько​​ по которым нужно​ столбцу. Т.е. два​ таких кодов полно​ MS Office, поэтому​После этого проще​ в 8Мб данный​ значения (Home -​ надо, по сути,​ в поле имен​

Корпорация "Центр"

Ссылка на основную публикацию