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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 26.07.2009, 01:11   #1
Cointreau
Новичок
Джуниор
 
Регистрация: 26.07.2009
Сообщений: 3
Восклицание форматирование "налету"

Стандартными средствами увы это не реализовать, а в VB я новичёк, поэтому прошу помощи от вас.
6 ячеек (A3;A4;A5;A6;A7;A8) форматируются "налету" в зависимости от числового значения А2.
Например цвета ячеек от зелёного к красному З Ж К меняются в зависимости от значения:
А2=от 80 до 100 соответсвенно: ЗЗЗЗЗЗ
А2=от 60 до 80 соответсвенно: ЗЗЗЗЖЖ
А2=от 40 до 60 соответсвенно: ЗЗЖЖКК
А2=от 20 до 40 соответсвенно: ЗЖЖККК
и тд.
Как должен выглядеть код, реализующий такое форматирование? Спасибо
Cointreau вне форума Ответить с цитированием
Старый 26.07.2009, 01:28   #2
pivas
Форумчанин
 
Регистрация: 03.04.2009
Сообщений: 412
По умолчанию

Цитата:
Сообщение от Cointreau Посмотреть сообщение
Стандартными средствами увы это не реализовать
Зачем же так не доверять Excel. Примените условное форматирование. В 2003 до 3-х условий, в 2007 много больше...
Вложения
Тип файла: rar Формат_на_лету.rar (1.5 Кб, 10 просмотров)
pivas вне форума Ответить с цитированием
Старый 26.07.2009, 02:26   #3
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,856
По умолчанию

pivas, в Вашем варианте при вводе числа меньше 20-ти все ячейки становятся зелеными.


Попробовал сделать сам:




Вот что получилось: (щелкните на рисунке для загрузки файла-примера)



Но, конечно, для таких целей удобнее использовать Excel 2007.

Последний раз редактировалось EducatedFool; 26.07.2009 в 02:43.
EducatedFool вне форума Ответить с цитированием
Старый 26.07.2009, 15:17   #4
Cointreau
Новичок
Джуниор
 
Регистрация: 26.07.2009
Сообщений: 3
По умолчанию

Спасибо за ответы, стандартным способон не получается так как задача нестандартная. На примере прикреплённого файла видно как должны происходить изменения. Если это ресурс масла в автомобиле, то полоска переходит от зелёного к красному в зависимости от некоего значения.
Вложения
Тип файла: rar bmw oil service.rar (2.5 Кб, 6 просмотров)
Cointreau вне форума Ответить с цитированием
Старый 26.07.2009, 15:44   #5
pivas
Форумчанин
 
Регистрация: 03.04.2009
Сообщений: 412
По умолчанию

Вынужден повторить: зря не доверяете Excel , пробуйте:
Вложения
Тип файла: rar bmw oil service.rar (2.3 Кб, 11 просмотров)
pivas вне форума Ответить с цитированием
Старый 26.07.2009, 16:17   #6
Cointreau
Новичок
Джуниор
 
Регистрация: 26.07.2009
Сообщений: 3
По умолчанию

Цитата:
Сообщение от pivas Посмотреть сообщение
Вынужден повторить: зря не доверяете Excel , пробуйте:
Через условное форматирование, действительно мне не стоило искать сложных путей, спасибо.
Cointreau вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Паскаль. 2 задачи (Программа "Верификация","КАК БРИГАДИРУ РАЗДЕЛИТЬ ЗАРОБОТАННЫЕ ДЕНЬГИ") Valik102 Помощь студентам 3 20.05.2009 20:42
блок "cont" с права не принимает значение "margin: 10px;" которое описано в body tabikA HTML и CSS 5 24.02.2009 21:50
Под прикрытием "кризиса" наши доблестные "управители" хотят утопить нас в радиоактивных отходах mihali4 Свободное общение 1 17.01.2009 01:43
если пользователь наберет какой-то другой символ не "y" или "n" и нажмет enter, программа проигнорирует skobets Общие вопросы C/C++ 2 03.06.2008 06:51
Excel файл открывается не "до конца" (странички "не показываются" только серое поле) Dorvir Microsoft Office Excel 2 28.03.2008 10:03