копирование строк в другой лист

[AndrewACC]

Есть таблица. В ней по определённому столбцу ячейки форматируются правилом в зависимости от их значения (15-й столбец).
Необходимо все строчки в которых значение 15-ого столбца имеют красный цвет копировать в другой лист\книгу.
Каким способом это можно сделать?

[GWolf]

Доброго дня!
Могу предложить: - Макросом. Только нужно уточнить, в какой момент должно осуществляться копирование. От этого будет зависеть сценарий работы макроса. Мне видятся один из двух вариантов: вариант первый - копируем при наступлении события: в ячейке появилось отрицательное значение. В таком случае "навешиваем" макрос на событие листа:

Код Выделить Развернуть

Private Sub Worksheet_Change(ByVal Target As Range)

End Sub
или

Код Выделить Развернуть

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

End Sub;
вариант второй - копируем при открытии и (или) при закрытии книги. В этом случае потребуется помечать уже скопированные, что бы не копировать дважды.
Какой вариант Вам предпочтительнее?

[GWolf]

К стати!
Вот здесь: http://www.planetaexcel.ru/forum/?PAGE_NAME=read&FID=8&TID=42244 решался похожий вопрос. И если уж мы договариваемся об использовании VBA, то есть ли смысл связываться с УФ? Я бы всю задачу решал на VBA. И места меньше занимает, да и гибче. На мой взгляд!

[AndrewACC]

Доброго дня!
Могу предложить: - Макросом. Только нужно уточнить, в какой момент должно осуществляться копирование. От этого будет зависеть сценарий работы макроса. Мне видятся один из двух вариантов: вариант первый - копируем при наступлении события: в ячейке появилось отрицательное значение. В таком случае "навешиваем" макрос на событие листа:

Код Выделить Развернуть

Private Sub Worksheet_Change(ByVal Target As Range)

End Sub
или

Код Выделить Развернуть

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

End Sub;
вариант второй - копируем при открытии и (или) при закрытии книги. В этом случае потребуется помечать уже скопированные, что бы не копировать дважды.
Какой вариант Вам предпочтительнее?

Предпочтительнее вообще делать это по кнопке, т.к. данная процедура будет делаться 1 раз как будут заполнены все данные.

[GWolf]

... Предпочтительнее вообще делать это по кнопке, т.к. данная процедура будет делаться 1 раз как будут заполнены все данные.

Ну, так нет ничего проще. Создаем на листе Элемент управления "Кнопка" и чипляем на нее макрос который будет "пробегать" в цикле строки таблицы и при обнаружении строки красного цвета, копировать ее.

[Галина Зайцева]

Здравствуйте, помогите,пожалуйста, поправить макрос -
есть файл свидетельство о поверке счетчиков воды.rar (данные в свидетельство вбиваются с клавиатуры) - требуется те же самые данные составить списком (для примера файл данные для водоканала.xls), я попыталась сделать макрос, которые выбирает нужные данные из свидетельства и переносит их на новый лист.
Вопрос: как поправить макрос так, чтобы он не затирал предыдущую строчку,т.е. меняя каждый раз данные в свидетельстве, макрос дописывал данные в таблицу и не затирал предыдущие.
Спасибо

[GWolf]

Здравствуйте, помогите,пожалуйста, поправить макрос ...

Прошу прощения, запрос о помощи к ТС или ко мне?

[GWolf]

Здравствуйте, помогите,пожалуйста, поправить макрос ...

Прошу прощения, запрос о помощи к ТС или ко мне?

Ну, на всякий случай, если вопрос был адресован мне. На скрепке вариант решения.