Нужна помощь по написанию макроса Exel, Нужка помощь в поправке кода! Опции

[Puric]

Вопрос собственно, есть макрос который формирует из общего списка адресов по рассылке газет новый список но уже без дубликатов по адресу (тоесть сравнение не по фамилии а по адресу, неважно в принципе)

Размер списка-исходника 166048 строк 12 столбов.
Макрос проводит сравнение с разбросом в 15 строк, помечая дубликаты как пройденные и зонося их в массив (массив в цикле, цикл через 15 елемонтов начинает с 1 заменяя данные)

Проблема, постепенное затупление обработчика, то есть к примеру на первой сотне от проходит 10-12 строй за секунду, на первом десятке тысяч уже 1-2 за секунду, на двадцатой тысяче уже за 2-3 секунды одну строку.

Файл с макросом для екселя 2007(много строк для 2003) приложил...(первый лист кусочек списка, второй самы кнопки запуска макроса)
Вопрос, кто то может посоветовать=поправить макрос на кнопке "Общие пересечения" (макрос Кнопка2_Щелчок)

Заранее спасибо....

Сообщение отредактировал Puric - 8.2.2013, 14:48

[RosT]

А функцией ВПР() пользоваться не пробовал для сопоставления данных с первого списка со вторым. Работы максимум на 5 минут. Единственный минус, если адреса написаны по разному(нет точного совпадения), то до одного места обработка будет.