|
|
|
Регистрация Восстановить пароль |
|||||||
| Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
||||
 |
|
|
Опции темы | Поиск в этой теме |
01.09.2010, 17:19
|
#1 |
|
Пользователь
Регистрация: 18.05.2010
Сообщений: 61
|
Фон ячейки в зависимости от значения
Посдкажите, пожалуйста, как написать код, который будет изменять цвет фона и текста в ячейке в зависимости от его значения. Например, если значение ниже 10, то фон белый, а текст зеленый, если от 10 до 15, то фон голубой, а текст желтый, если больше 15, то фон красный, а текст белый ?
Мерси заранее. |
|
|
|
01.09.2010, 17:27
|
#2 |
|
Участник клуба
Регистрация: 16.05.2010
Сообщений: 1,249
|
Меню Формат-Условное_форматирование.
Или обязательно код? |
|
|
|
|
01.09.2010, 17:46
|
#3 |
|
Пользователь
Регистрация: 26.05.2010
Сообщений: 77
|
Код написать так
Sub Raduga() Ish = Range("A1").Value Select Case Ish Case Is < 10 Range("A1").Interior.Color = vbWhite Range("A1").Font.Color = vbGreen Case 10 To 15 Range("A1").Interior.Color = vbBlue Range("A1").Font.Color = vbYellow Case Is > 20 Range("A1").Interior.Color = vbRed Range("A1").Font.Color = vbWhite End Select End Sub
Спасибо и Пасибы принимаются на WebMoney в американских Z143254902288 или русских R388611339241 монетах
|
|
|
|
|
Похожие темы
|
||||
| Тема | Автор | Раздел | Ответов | Последнее сообщение |
| В зависимости от значения в ComboBox1 выводить значения в ComboBox2 | LeX2009 | БД в Delphi | 14 | 21.05.2010 16:49 |
| Создание дроп листа в зависимости от значения ячейки | Brucebelg | Microsoft Office Excel | 2 | 18.05.2010 14:05 |
| Выпадающий список в зависимости от значения ячейки | Tanya2007 | Microsoft Office Excel | 6 | 25.03.2010 01:33 |
| Окраска ячейки в зависимости от значения | Апчхи | Microsoft Office Excel | 6 | 16.08.2009 19:31 |
