Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 12.04.2012, 09:30   #1
егоровна
Пользователь
 
Регистрация: 12.04.2012
Сообщений: 10
По умолчанию Сравнение двух листов.

Здравствуйте.
Помогите пожалуйста написать макрос (без access).
Дано два листа данных , с разным количеством столбцов. Во втором листе ячейки колонки G и ячейки колонки E первого листа, имеют одни значения , но вразброс (инвентарные номера). Необходимо , чтобы значения ячейки колонки G(2лист) сравнивались с ячейкой колонкой E(1 лист), если значение совпадают , то выводить ячейки колонки А,В,С 1листа в ячейки колонок А,В,С 2листа. Если попадаются пустые ячейки макрос не прерывался.
Спасибо.

Последний раз редактировалось егоровна; 12.04.2012 в 09:33.
егоровна вне форума Ответить с цитированием
Старый 12.04.2012, 10:38   #2
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Именно это и именно так делает код

http://www.excelworld.ru/index/comparefiles_find/0-25
или
http://hugo.nxt.ru/CompareFiles.Find.rar
или
http://ibay.narod.ru/other/CompareFiles.Find.rar

На листе указываете, какие данные сравнивать и какие куда копировать, жмёте кнопку.
Но только 15 раз бесплатно - берегите попытки
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 12.04.2012, 11:41   #3
егоровна
Пользователь
 
Регистрация: 12.04.2012
Сообщений: 10
По умолчанию

спасибо. попробую
егоровна вне форума Ответить с цитированием
Старый 12.04.2012, 12:46   #4
егоровна
Пользователь
 
Регистрация: 12.04.2012
Сообщений: 10
По умолчанию

Выставляю все значения .
Копирование не происходит ? Что не так.

Последний раз редактировалось егоровна; 12.04.2012 в 12:54.
егоровна вне форума Ответить с цитированием
Старый 12.04.2012, 13:08   #5
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Если бы я видел Ваши файлы - я бы мог сказать, что не так. Возможно...
Как работает под вин7 64 бит - не знаю, вероятно не работает...
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 12.04.2012, 13:15   #6
егоровна
Пользователь
 
Регистрация: 12.04.2012
Сообщений: 10
По умолчанию

В соседней теме пример настроек:
Настройки:

Файл - приёмник: D:\maroskaaa\финальная.xls
Файл - источник: D:\maroskaaa\сравнения.xls
Столбцы сравнения в приёмнике: a,b,c,d,e
Столбцы сравнения в источнике: a,b,c,d,e
Лист - приёмник (№): 1
Лист - источник (№): 1
Столбцы - приёмники данных копирования: i
Столбцы - источники данных копирования: f
У меня примерно так же .
Только из Листа1 колонки АВС скопировать в Лист2 (на теже места АВС) , если ячейки в Лист2 (колонка G) совпадает с ячейкой Лист1 (колонка Е). И не выйти из цикла , при попадании в пустую ячейку.
егоровна вне форума Ответить с цитированием
Старый 12.04.2012, 13:24   #7
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Попробуйте так и указать - a,b,c (через запятую, пробел можно не ставить).
Пустые ячейки не влияют, просматривает до последней заполненной по первому указанному столбцу (тут есть тонкое место, но обычно не мешает. Если мешает - добавьте временно что-то в файл в этот столбец).
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 12.04.2012, 13:28   #8
егоровна
Пользователь
 
Регистрация: 12.04.2012
Сообщений: 10
По умолчанию

Я так и делаю.
Файл - приёмник: D:\maroskaaa\финальная.xls
Файл - источник: D:\maroskaaa\сравнения.xls
Столбцы сравнения в приёмнике: G
Столбцы сравнения в источнике: E
Лист - приёмник (№): 2
Лист - источник (№): 1
Столбцы - приёмники данных копирования: A,B,C
Столбцы - источники данных копирования: A,B,C

В приемнике если внести произвольные значения в столбцах ABC , то после запуска они потираются (пустые)
егоровна вне форума Ответить с цитированием
Старый 12.04.2012, 13:42   #9
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Значит их затирает пустотой.
Т.е. совпадения находит. Что в конце в месиждбоксе пишет?
Так скоро попытки выйдут... А что делать?...
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 12.04.2012, 13:56   #10
егоровна
Пользователь
 
Регистрация: 12.04.2012
Сообщений: 10
По умолчанию

Спасибо .
Тему можно удалить .Решение найдено.
егоровна вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Сравнение нескольких листов и перенос значений r-r Microsoft Office Excel 1 06.10.2011 11:46
Сравнение листов по нескольким параметрам. Daragor Microsoft Office Excel 4 05.10.2011 14:52
Сравнение 2 листов hloppel Microsoft Office Excel 22 12.05.2010 16:38
Сравнение двух листов и вывод в определённой последовательности ОlGa Microsoft Office Excel 1 29.01.2010 21:06
Сравнение листов в книге, и копирование значений Josser Microsoft Office Excel 10 22.07.2009 08:26