![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Регистрация: 14.04.2011
Сообщений: 4
|
![]()
День добрый.
Не могу что-то додуматься. видимо нужен макрос или что-то вроде того. Имеем: строки задач со значениями в ячейках. первая ячейка строки помечена цветом задача закрыта или зеленый закрыта неполностью Требуется чтобы в скрипте были введены нужные условия (перечисление нужных кодов цвета ячейки который можно вытащить функцией Public Function Color(Cell As Range) Color = Cell.Interior.ColorIndex End Function ) чтобы строка, где была найдена ячейка удовлетворяющая условию, копировалась в указанный лист в итоге на нужном листе получим список активных задач на листе со всеми задачами первая ячейка помечается красным фоном т.е. задача закрывается - лист должен обновляться с учётом этого есть идеи как это лучше реализовать? Последний раз редактировалось rinariari; 14.04.2011 в 19:02. |
![]() |
![]() |
![]() |
#2 |
Форумчанин
Регистрация: 25.04.2010
Сообщений: 254
|
![]()
Тут несколько моментов (задач).
цикл с отбором по условию цвета фона ячейки If Cell.Interior.ColorIndex=? Then .... Строку скопировать на указанный лист - другая задача. Обновление листа2 по событию на листе1 - третья задача. Найдете меня через профиль, пришлете на ящик свои файлы - сделаю...
помогать студентам - моя вторая профессия
|
![]() |
![]() |
![]() |
#3 |
Регистрация: 14.04.2011
Сообщений: 4
|
![]()
Отправил на почту найденную через профиль )
|
![]() |
![]() |
![]() |
#4 |
Регистрация: 14.04.2011
Сообщений: 4
|
![]()
Огромное спасибо за код, всё отлично работает!
К сожалению только сегодня смог проверить и возник вопрос activ2 не выдирает в коде не нашёл такую константу, только If col = aktiv Then как правильно сделать чтобы не только по activ искал но и по aktiv2 ? что-то типа If col = aktiv or aktiv2 Then ? |
![]() |
![]() |
![]() |
#5 |
Участник клуба
Регистрация: 16.05.2010
Сообщений: 1,249
|
![]()
kim показывал пример использования "недомакросов" (макрофункций) для определения цвета заливки. ТОП_ЛЕВОЙ_ЛАПОЙ
|
![]() |
![]() |
![]() |
#6 |
Регистрация: 14.04.2011
Сообщений: 4
|
![]()
Задача реализована. спасибо was3110
|
![]() |
![]() |
![]() |
#7 |
Новичок
Джуниор
Регистрация: 06.07.2012
Сообщений: 2
|
![]()
У меня такая же проблема, нужно чтобы со всех листов, ячейки , содержащие текст "FYR" копировались на первый лист. И данные обновлялись, когда добавляются новые записи на листы.
Помогите, пожалуйста с макросом, очень нужно. |
![]() |
![]() |
![]() |
#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 |