ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Пожалуйста помогите!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
9 сообщений из 9, страница 1 из 1
Пожалуйста помогите!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
    #34059977
Pusulunda
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Pusulunda
Гость
Пожалуйста помогите! Мне нужно сделать так, чтобы при изменении цифры в одной ячейке, определенное количество других ячеек меняло цвет заливки. Файл прилагается.
Т.е. если в ячеке Е5 цифра 60, то в диапазоне K5:V5 цвет закрашивается!
если 40, то наоборот закрашивается в серый. Ну и так далее.
...
Рейтинг: 0 / 0
17.10.2006, 13:33:32
| Ответить | Цитировать | Написать  
Пожалуйста помогите!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
    #34060086
Фотография orunbek
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
orunbek
Участник
На модуле листа поставить следующий код
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$E$5" Then
        If Target.Value = "40" Then
            Range("K5:V5").Interior.Color = vbRed
        ElseIf Target.Value = "60" Then
            Range("K5:V5").Interior.Color = vbGreen
        End If
    End If
End Sub
и еще файл выложил, здесь цвет vbRed и vbGreen на нужный поменяйте
...
Рейтинг: 0 / 0
17.10.2006, 13:54:04
| Ответить | Цитировать | Написать  
Пожалуйста помогите!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
    #34060198
Pusulunda
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Pusulunda
Гость
Спасибочки большое!! Я немного изменила и у меня получилось. Правда надо каким-то образом узнать как в vb серый цвет обозначается? И где эти цвета (названия) взять?
...
Рейтинг: 0 / 0
17.10.2006, 14:14:42
| Ответить | Цитировать | Написать  
Пожалуйста помогите!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
    #34060254
Indian
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Indian
Гость
PusulundaСпасибочки большое!! Я немного изменила и у меня получилось. Правда надо каким-то образом узнать как в vb серый цвет обозначается? И где эти цвета (названия) взять?
Узнай эти названия в русско-английском словаре и подставь перед ними vb :)
Таким образом, серый цвет у нас получается: vbGrey :)
...
Рейтинг: 0 / 0
17.10.2006, 14:31:20
| Ответить | Цитировать | Написать  
Пожалуйста помогите!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
    #34060269
Pusulunda
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Pusulunda
Гость
серые цвета бывают разные! Вот в чем загвоздка!!!!
...
Рейтинг: 0 / 0
17.10.2006, 14:35:42
| Ответить | Цитировать | Написать  
Пожалуйста помогите!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
    #34060292
Indian
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Indian
Гость
Pusulundaсерые цвета бывают разные! Вот в чем загвоздка!!!!
Тогда можно включить запись макросов, позакрашивать ячейки различными цветами. Остановить запись макроса, и посмотреть сгенерированный им код. Там будет видно какие цвета он применяет к ячейке.
...
Рейтинг: 0 / 0
17.10.2006, 14:40:19
| Ответить | Цитировать | Написать  
Пожалуйста помогите!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
    #34060325
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AndreTM
Участник
Посмотри файл
Там все без макросов, а через Формат->условное форматирование...
Там в кнопочке формат меняешь заливку для ячейки K* на нужный цвет
и растягиваешь правой кнопкой до конца, а затем говоришь "скопировать форматы"
Числа в строке 3 можно сделать серыми, чтоб не было видно
...
Рейтинг: 0 / 0
17.10.2006, 14:49:05
| Ответить | Цитировать | Написать  
Пожалуйста помогите!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
    #34060521
Pusulunda
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Pusulunda
Гость
AndreTMПосмотри файл
Там все без макросов, а через Формат->условное форматирование...
Там в кнопочке формат меняешь заливку для ячейки K* на нужный цвет
и растягиваешь правой кнопкой до конца, а затем говоришь "скопировать форматы"
Числа в строке 3 можно сделать серыми, чтоб не было видно

Спасибо!!! Это думаю мне больше подойдет!!!!
...
Рейтинг: 0 / 0
17.10.2006, 15:38:42
| Ответить | Цитировать | Написать  
Пожалуйста помогите!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
    #34061132
KL (XL)
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
KL (XL)
Участник
Все тоже без единого макроса за 3 минуты и 37 секунд :-)

KL
[MVP - Microsoft Excel]
...
Рейтинг: 0 / 0
17.10.2006, 17:29:12
| Ответить | Цитировать | Написать  
9 сообщений из 9, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Пожалуйста помогите!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&gotonew=1&tid=2184122]:
 0ms
get settings:
 9ms
get forum list:
 18ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 72ms
get topic data:
 11ms
get first new msg:
 7ms
get forum data:
 3ms
get page messages:
 46ms
get tp. blocked users:
 1ms
others: 243ms
total:  416ms
созд. / загр.: 416ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]