Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 09.09.2009, 13:52   #1
legion-mia
Пользователь
 
Регистрация: 25.02.2009
Сообщений: 14
По умолчанию Окрашивание строки по условию

Порылся по форуму нашел несколько примеров,
но мозгов не хватает под себя их переделать

задача
есть 5 столбцов с данными, во втором столбце статус
нужно чтобы макрос автоматом в зависимости от статуса окрашивал всю строчку

проще пример глянуть
во вложении есть макрос, нужно нечто подобное
но чтобы окрашивалась вся строка

ЗЫ условное форматирование не предлагать
Вложения
Тип файла: rar tka.rar (10.6 Кб, 34 просмотров)
я не программист и программировать не умею...
просто имел несчастье сделать пару макросов для бухгалтеров... теперь они меня считают программером >_<
legion-mia вне форума Ответить с цитированием
Старый 09.09.2009, 15:21   #2
motorway
Участник клуба
 
Регистрация: 28.06.2009
Сообщений: 1,950
По умолчанию

Попробуйте в коде заменить строчки на
Код:
Rows(cell.Row).Interior.ColorIndex = 10
Код:
Rows(cell.Row).Interior.ColorIndex = 6
motorway вне форума Ответить с цитированием
Старый 09.09.2009, 16:20   #3
Sh_Alex
Пользователь
 
Регистрация: 02.02.2009
Сообщений: 59
По умолчанию

Посмотрите файл. Может то, что нужно?
С уважением, Александр.
Вложения
Тип файла: rar Цветная строка.rar (7.6 Кб, 43 просмотров)
Sh_Alex вне форума Ответить с цитированием
Старый 10.09.2009, 06:21   #4
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Во вложении Ваш макрос, только подправленный.
А Вам действительно нужно проверять все ячейки диапазона? Может быть достаточно только в каком-то конкретном столбце? И почему до 1000? Может быть достаточно до последней заполненной строки?
Вложения
Тип файла: rar tka_2.rar (7.8 Кб, 55 просмотров)
Чем шире угол зрения, тем он тупее.
SAS888 вне форума Ответить с цитированием
Старый 10.09.2009, 07:46   #5
legion-mia
Пользователь
 
Регистрация: 25.02.2009
Сообщений: 14
По умолчанию

Цитата:
Сообщение от SAS888 Посмотреть сообщение
Во вложении Ваш макрос, только подправленный.
спасибо, то что надо
макрос не мой.. я его тут находил...
он просто для примера был

Цитата:
Сообщение от SAS888 Посмотреть сообщение
А Вам действительно нужно проверять все ячейки диапазона? Может быть достаточно только в каком-то конкретном столбце? И почему до 1000? Может быть достаточно до последней заполненной строки?
на это меня хватит...
щаз напильником доработаю
я не программист и программировать не умею...
просто имел несчастье сделать пару макросов для бухгалтеров... теперь они меня считают программером >_<
legion-mia вне форума Ответить с цитированием
Старый 10.09.2009, 09:11   #6
Vbonivur
Новичок
Джуниор
 
Регистрация: 07.08.2009
Сообщений: 2
По умолчанию

Спасибо, мне макрос то же помог!
Vbonivur вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Окрашивание активной ячейки ru3000 Microsoft Office Excel 33 14.03.2012 16:17
авто окрашивание ячеек Анатолий198420 Microsoft Office Excel 9 15.08.2009 15:00
В БД необходимо создать макрос, суть которого расчет итоговой строки по условию mex32 Microsoft Office Excel 31 01.04.2009 13:05
Из трех листов перенести строки по условию Romuald Microsoft Office Excel 3 18.03.2009 16:09
Извлечь в одну ячейку несколько значений из строки которые удовлетворяют заданному условию. Dorvir Microsoft Office Excel 5 08.04.2008 16:12