фильтрация данных и добавление новых записей макросом

[U_Oksana]

Доброго всем времени суток! Добрые и умные люди откликнитесь, пожалуйста!
Нужны макросы для быстрой работы с банковскими выписками.
Первый – для отбора данных по заданным критериям. Второй – для добавления новых записей в таблицу из других листов.
Итак, алгоритм работы таков:
Из 1С утром копируется первая (позднее будет еще одна) выписка в excel. Далее нужен некий макрос обработки, который с помощью «расширенного фильтра» отберет записи, удовлетворяющие заданным критериям (лист с условиями отбора есть в книге), а ненужные записи удалит. Затем нужно добавить справа от таблицы 2 столбца с конкретными названиями (есть в примере), отформатировать их, в один из столбцов вставить формулы и подсчитать итоги. Пока все. Дальше начинается работа с этим листом (вносятся кое-какие данные в добавленный столбец). Позднее выписка в 1С обновляется. Снова копируем ее в excel (лист уже другой, но в этой же книге). Записей во 2-ой выписке уже гораздо больше, чем в 1-ой. Опять запускаем макрос обработки и оставляем только нужную информацию. Вот теперь нужен макрос, который сравнит 1-ую и 2-ую выписки и добавит из 2-ой выписки в 1-ую только те строки, которых нет. Куда именно добавлять строки, вначало или в конец таблицы, разницы нет, но конечно, чтоб в итоги все суммы попадали. Лист со 2-ой выпиской потом следует удалить (могу сама, лучше из макроса). Вот, в принципе, и все. Может быть, слишком перегрузила с информацией и все гораздо проще.
Совсем не зная VBA, я попыталась записать макрос, который выборку мне делает, столбцы вставляет с формулами, но удалить «спрятанные строки» у меня не получается и сравнить 2 таблицы в разных листах и добавить строки тоже не могу. Заранее всем спасибо.

[doober]

Я правильно понимаю ,что СЧЕТ+ИНН-уникальны в этот день

Откуда брать Расход Остаток

[U_Oksana]

"Расход" буду заполнять я сама, а "Остаток" должен считаться как разница между "Суммой" и "Расходом". По поводу уникальности, думаю, что нет, потому что от одного контрагента в одинь день может прийти несколько платежей.

[doober]

Проверяйте,макрос Start
У меня получается на 2 записи больше

[U_Oksana]

После 1 выгрузки запись с номером 25 попадает - он мне не нужен (его в условии отбора нет), и не попадает номер 33, после 2 выгрузки 4 и 10 записи не мои.

[doober]

Подправил ....

[U_Oksana]

Все, работает, спасибо, но вопросы есть, если можно. Выгружать данные можно только на лист "ВЫВОД"? Мне удобнее работать с исходным листом (т.е. запустить макрос и в листе 13_1 оставить только нужные мне данные). Потом опять запустить макрос и с листа 13_2 добавить данные в 13_1. Это невозможно? И ещё, если у меня критерии отбора увеличатся, все сработает или подправлять где-то что-то нужно будет???

[doober]

Выгружать можно на любой лист,для этого я сделал выбор листа выгрузки.
Кнопка 1 выгрузка только раз отрабатывает,2выгрузка-сколько угодно,она добавляет только новые
для изменения фильтра меняете ,или добавляете в sSql_L =
В коде обоих кнопок.


Or F3 Like '%Ваше новое условие%'

Красное-это догма.

Удаление

....F3 Like '%за КАМАЗ%' Or F3 Like '%За КАМАЗ%' Or F3 Like ..


* не ставить ей равносилен %

[U_Oksana]

Уважаемый doober, я разобралась с листами и выгрузками, спасибо огромное за помощь. Еще вопросик (не сочтите за наглость после выгрузки, можно найти последнюю строку таблицы и подсчитать сумму по всему столбцу? Мне нужны ИТОГИ по столбцам "E" и "I". Может вы напишите код, как это сделать, а я вставлю в макрос. Спасибо.

[doober]

Пришлось добавить инструмент для подсчета суммы