Отправляет email-рассылки с помощью сервиса Sendsay

RFpro.ru: Пакет Microsoft Office

  Все выпуски  

RusFAQ.ru: Пакет Microsoft Office


РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Помощь пользователю ПО / Пакет Microsoft Office

Выпуск № 448
от 09.09.2007, 06:35

Администратор:Ерёмин А.А.
В рассылке:Подписчиков: 403, Экспертов: 103
В номере:Вопросов: 1, Ответов: 2


Вопрос № 100746: Всем привет! Как екселе в условие "ЕСЛИ" включить условие про цвет ячейки? Например если ячейка желтая,то значение показывается ,а если нет ,то данные не показываются......

Вопрос № 100.746
Всем привет!

Как екселе в условие "ЕСЛИ" включить условие про цвет ячейки?
Например если ячейка желтая,то значение показывается ,а если нет ,то данные не показываются...
Отправлен: 04.09.2007, 06:19
Вопрос задал: Ak4 (статус: Посетитель)
Всего ответов: 2
Мини-форум вопроса >>> (сообщений: 4)

Отвечает: Архипов Александр Леонидович
Здравствуйте, Ak4!
Скорее всего никак! Это возможно только при условии использования VBA.
Ответ отправил: Архипов Александр Леонидович (статус: 2-ой класс)
Ответ отправлен: 04.09.2007, 07:38

Отвечает: Shapoklak
Здравствуйте, Ak4!
Ну, короче, вот что получилось. Не пинайте :).
Образец прикрепляю.
1. Одну из ячеек красим в цвет образца.
2. Сервис - макрос - создать макрос
Записываете пустой макрос, потом редактируете, вставляя такой вот текст
Function CountRangeColor(iCell, iRanges)
iColor = iCell.Interior.ColorIndex
For Each iCells In iRanges
If iCells.Interior.ColorIndex = iColor Then
CountRangeColor = CountRangeColor + vbNull
End If
Next
End Function

3. Еще одна ячейка будет счетчиком. В нее вводим формулу, т.е. набираем =, но не выбираем стандартные функции, а пишем имя CountRangeColor, а в качестве аргументов указываем ячейку с образцом цвета и ячейку, в которой должен меняться цвет шрифта.
Проверяем, как оно работает. Если цвет в ячейке равен цвету образца, счетчик показывает 1 (его можно скрыть, если нужно)

4. Выделяем ячейку, в которой будет меняться цвет шрифта.
Формат - условное форматирование.
В условии выбираем Формула, пишем =$C$1>0 где $C$1 - это адрес ячейки-счетчика, в Отображении ячейки при выполнении условия выбираем
Формат - Шрифт - указываем цвет шрифта тот же, что и цвет заливки ячейки. Нажимаем ОК.

Все. Единственное, что еще не доделано - заставить все это автоматом обновляться (т.к. при изменении буквочек приходится, чтоб происходил перерасчет, щелкать по ячейке со счетчиком, потом по строке формул).
Да! Я не VBA-программист, но предполагаю, что в и самом скрипте цвет шрифта можно задать программно (тогда цвет будет определяться самой функцией пользователя, а не при условном форматировании), но как он определяется, я не знаю, советую обратиться на один из тех форумов, про которые я писала.

Прикреплённый файл: Загрузить >>
Срок хранения файла на сервере RusFAQ.ru составляет 30 суток с момента отправки ответа.

Ответ отправила: Shapoklak (статус: Академик)
Россия, Орск
Организация: школа
Адрес: www.school56orsk.narod.ru
WWW: компьютерные фирмы г. Орска
ICQ: 101137510
----
Ответ отправлен: 04.09.2007, 23:01


Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!

Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.


© 2001-2007, Портал RusFAQ.ru, Россия, Москва.
Авторское право: ООО "Мастер-Эксперт Про"
Техподдержка портала, тел.: +7 (926) 535-23-31
Хостинг: "Московский хостер"
Поддержка: "Московский дизайнер"
Авторские права | Реклама на портале
Версия системы: 4.58 от 30.08.2007
Яндекс Rambler's Top100
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru
Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru

В избранное