С Новым годом! Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.76/34: Рейтинг темы: голосов - 34, средняя оценка - 4.76
0 / 0 / 0
Регистрация: 14.05.2019
Сообщений: 21
Excel

Сравнить два столбца в двух разных файлах MS Excel

12.07.2019, 10:50. Показов 7044. Ответов 10

Студворк — интернет-сервис помощи студентам
Добрый день ув.форумчане! Нужна ваша помощь.

Передо мной стоит задача написать макрос который сравнит два столбца в двух разных файлах excel(я).
Начальство сказало писать на VBA, а я с ним и не работал-то ни разу.

Сама задача:
Есть два файла excel с абсолютно одинаковой структурой, таблицы с данными находятся на первых листах файлов (Лист1).
Надо сравнить столбец 'F' Документа1, в котором находятся эталонные значения с данными из столбца 'F' Документа2, куда люди заносят свои данные. Сравнение происходит каждой ячейки Документа2 с этой же ячейкой Документа1(эталон). То есть, сравнивается ячейка F4 Документа2 с ячейкой F4 Документа1(эталон) и так далее, сравнение происходит только по столбцу 'F'. Длинна столбца 'F' произвольная и может меняться. То есть, в Документ1 могут быть добавлены новые эталонные значения, после чего люди будут заполнять эти же поля в Документе2.
Макрос в результате отработки создаст новый файл excel, куда в столбец 'A' копирует столбец 'F' Документа1(эталон), в столбец 'B' копирует столбец 'F' Документа2, а в столбец 'C' будут выведены значения 0 и 1, если данные совпали = 0, если не совпали = 1, на против каждой ячейки.

Буду очень благодарен за любую помощь!
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
12.07.2019, 10:50
Ответы с готовыми решениями:

Сравнить два столбца на разных листах. Вывести на Лист3 не совпадающие значения
Private Sub CommandButton3_Click() For I = 2 To 250 For j = 1 To 110 Sheets("Результат").Cells(I, j) = "" Next j Next...

Сравнить два столбца с разных листов и вывести несовпадения на отдельный лист
Добрый день, уважаемые ГУРУ VBA! Задача заключается в следующем, есть книга с двумя листами Лист 1 - Справочник Банков ЦБ...

Как сравнить два столбца в Excel
Добрый день! Есть 2 столбца с данными, в первом столбце данных больше , чем во втором.Необходимо узнать, какие данные во втором столбце...

10
4089 / 1469 / 401
Регистрация: 07.08.2013
Сообщений: 3,670
12.07.2019, 11:03
а вы можете выложить 2 файла ексель
с забитыми данными
строк по 10
данные могут быть "левые"

для меня например слово данные настолько обширно
что я даже сейчас не могу себе представить какое значение вы вкладываете в это слово
1
371 / 269 / 93
Регистрация: 18.11.2015
Сообщений: 1,001
12.07.2019, 11:05
Проставьте нужные названия
Вложения
Тип файла: 7z Сверка.7z (11.3 Кб, 12 просмотров)
1
0 / 0 / 0
Регистрация: 14.05.2019
Сообщений: 21
12.07.2019, 11:52  [ТС]
Падает с ошибкой "Run-time error '438'
Object doesn't support this property or method
После открытия дебага подсвечивает строку:
aAll = App...
Значения подставил свои, потом пробовал использовать имена из макроса, но все равно падает
0
0 / 0 / 0
Регистрация: 14.05.2019
Сообщений: 21
12.07.2019, 11:59  [ТС]
Цитата Сообщение от snipe Посмотреть сообщение
а вы можете выложить 2 файла ексель
Вот пожалуйста
Вложения
Тип файла: zip Примеры.zip (16.5 Кб, 16 просмотров)
0
0 / 0 / 0
Регистрация: 14.05.2019
Сообщений: 21
12.07.2019, 12:03  [ТС]
Цитата Сообщение от baulala Посмотреть сообщение
Макрос в результате отработки создаст новый файл excel
Можно наверное и без нового файла, пускай добавляет доп.столбцы в файл эталон, допустим столбец 'F' из Документа2 и следующий столбец со значениями 1/0
0
198 / 132 / 67
Регистрация: 27.03.2019
Сообщений: 288
12.07.2019, 12:31
Лучший ответ Сообщение было отмечено baulala как решение

Решение

baulala, Можно вот так. там же можно и под себя подредактировать, в зависимости от задач и желаний. (Тут с новой книгой)
макрос в эталоне
Вложения
Тип файла: zip Документ2.zip (24.0 Кб, 36 просмотров)
1
371 / 269 / 93
Регистрация: 18.11.2015
Сообщений: 1,001
12.07.2019, 12:53
Цитата Сообщение от baulala Посмотреть сообщение
После открытия дебага подсвечивает строку:
aAll = App...
Проверьте правильно ли указан Название книги, листа Эталона
1
21 / 12 / 10
Регистрация: 12.07.2019
Сообщений: 47
12.07.2019, 14:42
Лучший ответ Сообщение было отмечено baulala как решение

Решение

Может вот так пойдет? Путь указывать до корневой папки, например - D:\Файлы\Примеры
Макрос в Эталон.xlsm
Вложения
Тип файла: zip Примеры.zip (26.3 Кб, 30 просмотров)
1
0 / 0 / 0
Регистрация: 14.05.2019
Сообщений: 21
12.07.2019, 15:38  [ТС]
Большое спасибо! Все отлично работает!

Добавлено через 23 минуты
Цитата Сообщение от Kate_27 Посмотреть сообщение
там же можно и под себя подредактировать
Kate_27, а вы не подскажите, как убить пустые строки в результате?

Добавлено через 16 минут
Цитата Сообщение от Daller Посмотреть сообщение
Может вот так пойдет?
Я не совсем понял, зачем отдельный макрос для формулы? можете объяснить?
0
21 / 12 / 10
Регистрация: 12.07.2019
Сообщений: 47
12.07.2019, 17:43
Да не зачем. Удалить его надо )
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
12.07.2019, 17:43
Помогаю со студенческими работами здесь

Сравнить два столбца в двух книгах
Есть один столбец в котором 23000 строк в книге №1, и есть столбец с 1600 стоками в книге №2. Нужно, чтобы в книге №1 были выделены те...

Сравнить значения ячеек в разных файлах
добрый день! задача такая: есть табличка. все значения в ней вводятся вручную каждую неделю создаю такой же файл и заполняю. нужно...

Сравнить строки в двух файлах
Доброго времени суток, уважаемый форум! Возникла проблема: имеется два файла *.txt **.txt. Нужно считать из них строки, те из них которые...

Необходимо сравнить ячейки столбцов в разных файлах и при совпадении заменить значение
Собственно сама задача. Есть два файла, "Заказы" и "Услуги Диагностика". Необходимо сравнить столбец "Специальность" из файла...

Вывод результатов из одной таблицы и одного столбца в два разных столбца
Ребят помогите, измучалась совсем, не знаю как решить. Есть таблица Таблица t2 Id Pid Pr Text 1 1 0 'sub text1 1' ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
11
Ответ Создать тему
Новые блоги и статьи
Модель микоризы: классовый агентный подход 3
anaschu 06.01.2026
aa0a7f55b50dd51c5ec569d2d10c54f6/ O1rJuneU_ls https:/ / vkvideo. ru/ video-115721503_456239114
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR
ФедосеевПавел 06.01.2026
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ВВЕДЕНИЕ Введу сокращения: аналоговый ПИД — ПИД регулятор с управляющим выходом в виде числа в диапазоне от 0% до. . .
Модель микоризы: классовый агентный подход 2
anaschu 06.01.2026
репозиторий https:/ / github. com/ shumilovas/ fungi ветка по-частям. коммит Create переделка под биомассу. txt вход sc, но sm считается внутри мицелия. кстати, обьем тоже должен там считаться. . . .
Расчёт токов в цепи постоянного тока
igorrr37 05.01.2026
/ * Дана цепь постоянного тока с сопротивлениями и напряжениями. Надо найти токи в ветвях. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа и решает её. Последовательность действий:. . .
Новый CodeBlocs. Версия 25.03
palva 04.01.2026
Оказывается, недавно вышла новая версия CodeBlocks за номером 25. 03. Когда-то давно я возился с только что вышедшей тогда версией 20. 03. С тех пор я давно снёс всё с компьютера и забыл. Теперь. . .
Модель микоризы: классовый агентный подход
anaschu 02.01.2026
Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост.
Programma_Boinc 28.12.2025
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / **********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / **********/ gallery/ bKBkQFf Пост отсюда. . .
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США.
Programma_Boinc 26.12.2025
Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru