|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
14.04.2011, 18:59 | #1 |
Регистрация: 14.04.2011
Сообщений: 4
|
копирование строки по условию цвета
День добрый.
Не могу что-то додуматься. видимо нужен макрос или что-то вроде того. Имеем: строки задач со значениями в ячейках. первая ячейка строки помечена цветом задача закрыта или зеленый закрыта неполностью Требуется чтобы в скрипте были введены нужные условия (перечисление нужных кодов цвета ячейки который можно вытащить функцией Public Function Color(Cell As Range) Color = Cell.Interior.ColorIndex End Function ) чтобы строка, где была найдена ячейка удовлетворяющая условию, копировалась в указанный лист в итоге на нужном листе получим список активных задач на листе со всеми задачами первая ячейка помечается красным фоном т.е. задача закрывается - лист должен обновляться с учётом этого есть идеи как это лучше реализовать? Последний раз редактировалось rinariari; 14.04.2011 в 19:02. |
15.04.2011, 07:17 | #2 |
Форумчанин
Регистрация: 25.04.2010
Сообщений: 254
|
Тут несколько моментов (задач).
цикл с отбором по условию цвета фона ячейки If Cell.Interior.ColorIndex=? Then .... Строку скопировать на указанный лист - другая задача. Обновление листа2 по событию на листе1 - третья задача. Найдете меня через профиль, пришлете на ящик свои файлы - сделаю...
помогать студентам - моя вторая профессия
|
15.04.2011, 10:57 | #3 |
Регистрация: 14.04.2011
Сообщений: 4
|
Отправил на почту найденную через профиль )
|
18.04.2011, 10:49 | #4 |
Регистрация: 14.04.2011
Сообщений: 4
|
Огромное спасибо за код, всё отлично работает!
К сожалению только сегодня смог проверить и возник вопрос activ2 не выдирает в коде не нашёл такую константу, только If col = aktiv Then как правильно сделать чтобы не только по activ искал но и по aktiv2 ? что-то типа If col = aktiv or aktiv2 Then ? |
18.04.2011, 11:14 | #5 |
Участник клуба
Регистрация: 16.05.2010
Сообщений: 1,249
|
kim показывал пример использования "недомакросов" (макрофункций) для определения цвета заливки. ТОП_ЛЕВОЙ_ЛАПОЙ
|
18.04.2011, 13:14 | #6 |
Регистрация: 14.04.2011
Сообщений: 4
|
Задача реализована. спасибо was3110
|
27.07.2012, 16:37 | #7 |
Новичок
Джуниор
Регистрация: 06.07.2012
Сообщений: 2
|
У меня такая же проблема, нужно чтобы со всех листов, ячейки , содержащие текст "FYR" копировались на первый лист. И данные обновлялись, когда добавляются новые записи на листы.
Помогите, пожалуйста с макросом, очень нужно. |
27.07.2012, 16:46 | #8 |
Новичок
Джуниор
Регистрация: 06.07.2012
Сообщений: 2
|
пример.rar
Вот детальное описание проблемы. Кто то может пмочь с написанием макроса на копирование по условию? |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
удаление строки по условию | avmarafon | Microsoft Office Excel | 2 | 08.01.2011 23:52 |
Изменение цвета поля по условию | timesoon | Microsoft Office Access | 0 | 02.06.2010 09:33 |
Копирование данных по условию. | sirius24 | Microsoft Office Excel | 6 | 06.04.2010 09:17 |
Отбор данных по условию и копирование на новый лист | Эдик12 | Microsoft Office Excel | 4 | 03.03.2010 23:16 |
Окрашивание строки по условию | legion-mia | Microsoft Office Excel | 5 | 10.09.2009 09:11 |