Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Задать цвет фона ячейки по значению в ячейке - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
Страница 1 из 11
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK 
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Задать цвет фона ячейки по значению в ячейке (Формулы/Formulas)
Задать цвет фона ячейки по значению в ячейке
карандаш Дата: Среда, 16.03.2016, 13:54 | Сообщение № 1
Группа: Проверенные
Ранг: Обитатель
Сообщений: 319
Репутация: 7 ±
Замечаний: 20% ±

2010
Здравствуйте!

Подскажите, можно задать какую-либо формулу в УФ, чтобы цвет фона ячеки был взят из значения ячейки?
Само значение ячейки - результат вычисления, не записано константой.

или тут без VBA никак не обойтись?
К сообщению приложен файл: 4512955.xlsx(17Kb)


Сообщение отредактировал карандаш - Среда, 16.03.2016, 21:51
 
Ответить
СообщениеЗдравствуйте!

Подскажите, можно задать какую-либо формулу в УФ, чтобы цвет фона ячеки был взят из значения ячейки?
Само значение ячейки - результат вычисления, не записано константой.

или тут без VBA никак не обойтись?

Автор - карандаш
Дата добавления - 16.03.2016 в 13:54
_Boroda_ Дата: Среда, 16.03.2016, 14:00 | Сообщение № 2
Группа: Модераторы
Ранг: Экселист
Сообщений: 9365
Репутация: 3939 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
Не, боюсь, что не обойтись.
Вариант только втупую прописать много правил УФ для каждого значения. Типа
=A1=3 - Красный
=A1=5 - Синий


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеНе, боюсь, что не обойтись.
Вариант только втупую прописать много правил УФ для каждого значения. Типа
=A1=3 - Красный
=A1=5 - Синий

Автор - _Boroda_
Дата добавления - 16.03.2016 в 14:00
buchlotnik Дата: Среда, 16.03.2016, 14:00 | Сообщение № 3
Группа: Друзья
Ранг: Старожил
Сообщений: 2049
Репутация: 613 ±
Замечаний: 0% ±

2010, 2013, 2016 RUS / ENG
файл будет?


платная помощь:
ЯД: 410012595572239; WM: 311017577133
buchlotnik@mail.ru
 
Ответить
Сообщениефайл будет?

Автор - buchlotnik
Дата добавления - 16.03.2016 в 14:00
abtextime Дата: Среда, 16.03.2016, 14:06 | Сообщение № 4
Группа: Проверенные
Ранг: Обитатель
Сообщений: 427
Репутация: 60 ±
Замечаний: 0% ±

Excel 2010
ИМХО, теоретически что мешает задать N формул для УФ для всех возможных значений/заливок? Только зачем это?

Конечно, VBA, вы же не пользуетесь вилкой, когда едите суп, хотя и это теоретически возможно и даже где-то авангардно.

Опять же - всё ИМХО, тут умельцы такое с формулами вытворяют, что всё новые грани Excel открываешь
 
Ответить
СообщениеИМХО, теоретически что мешает задать N формул для УФ для всех возможных значений/заливок? Только зачем это?

Конечно, VBA, вы же не пользуетесь вилкой, когда едите суп, хотя и это теоретически возможно и даже где-то авангардно.

Опять же - всё ИМХО, тут умельцы такое с формулами вытворяют, что всё новые грани Excel открываешь

Автор - abtextime
Дата добавления - 16.03.2016 в 14:06
карандаш Дата: Среда, 16.03.2016, 14:25 | Сообщение № 5
Группа: Проверенные
Ранг: Обитатель
Сообщений: 319
Репутация: 7 ±
Замечаний: 20% ±

2010
спасибо
пошёл на VBA
[moder]Не ходите. Решайте в одной теме. Здесь.


Сообщение отредактировал _Boroda_ - Среда, 16.03.2016, 14:30
 
Ответить
Сообщениеспасибо
пошёл на VBA
[moder]Не ходите. Решайте в одной теме. Здесь.

Автор - карандаш
Дата добавления - 16.03.2016 в 14:25
Che79 Дата: Среда, 16.03.2016, 14:52 | Сообщение № 6
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 177
Репутация: 22 ±
Замечаний: 0% ±

Excel 2007, Excel 2010
Может, УФ - шкала цветов, не оно?
Хотя, без файла-примера явно не оно...)


Делай нормально и будет нормально!
 
Ответить
СообщениеМожет, УФ - шкала цветов, не оно?
Хотя, без файла-примера явно не оно...)

Автор - Che79
Дата добавления - 16.03.2016 в 14:52
карандаш Дата: Среда, 16.03.2016, 21:51 | Сообщение № 7
Группа: Проверенные
Ранг: Обитатель
Сообщений: 319
Репутация: 7 ±
Замечаний: 20% ±

2010
файл приложил
к первому сообщению

цвет фона ячейки по значению чисел в трех ячейках справа по цветам


Сообщение отредактировал карандаш - Среда, 16.03.2016, 21:53
 
Ответить
Сообщениефайл приложил
к первому сообщению

цвет фона ячейки по значению чисел в трех ячейках справа по цветам

Автор - карандаш
Дата добавления - 16.03.2016 в 21:51
Manyasha Дата: Среда, 16.03.2016, 22:45 | Сообщение № 8
Группа: Модераторы
Ранг: Старожил
Сообщений: 1586
Репутация: 662 ±
Замечаний: 0% ±

Excel 2007, 2010
карандаш, так например:
[vba]
Код
Sub colorAllCells()
    For i = 7 To ActiveSheet.UsedRange.Rows.Count + ActiveSheet.UsedRange.Row - 1
        For j = 3 To ActiveSheet.UsedRange.Columns.Count Step 6
            With Cells(i, j)
                .Interior.Color = RGB(.Offset(0, 1), .Offset(0, 2), .Offset(0, 3))
            End With
        Next j
    Next i
End Sub
[/vba]и на событие change
[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count > 1 Then Exit Sub
    If Target.Row = 3 Or Target.Row = 5 Then colorAllCells
End Sub
[/vba]
Наверное можно как-то покультурнее написать...чтобы не весь лист красился, а только нужные столбцы (это я про событие), но мне уже лень :p
К сообщению приложен файл: 4512955-1.xlsm(27Kb)


marinamorozova_box@mail.ru
ЯД: 410013299366744 WM: R193491431804
 
Ответить
Сообщениекарандаш, так например:
[vba]
Код
Sub colorAllCells()
    For i = 7 To ActiveSheet.UsedRange.Rows.Count + ActiveSheet.UsedRange.Row - 1
        For j = 3 To ActiveSheet.UsedRange.Columns.Count Step 6
            With Cells(i, j)
                .Interior.Color = RGB(.Offset(0, 1), .Offset(0, 2), .Offset(0, 3))
            End With
        Next j
    Next i
End Sub
[/vba]и на событие change
[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count > 1 Then Exit Sub
    If Target.Row = 3 Or Target.Row = 5 Then colorAllCells
End Sub
[/vba]
Наверное можно как-то покультурнее написать...чтобы не весь лист красился, а только нужные столбцы (это я про событие), но мне уже лень :p

Автор - Manyasha
Дата добавления - 16.03.2016 в 22:45
_Boroda_ Дата: Среда, 16.03.2016, 23:51 | Сообщение № 9
Группа: Модераторы
Ранг: Экселист
Сообщений: 9365
Репутация: 3939 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
в ячейку вводится слово "крась" и она красится по 3-м значениям справа
"крась" можно вводить сразу в несколько ячеек (с помощью Контрл Ентер или просто копи-пастом)
Красится Условным форматированием. Шрифт красится в тот же цвет, чтобы не видно было.
Если в ячейке что-то другое (или ничего), то УФ убивается.

===========
Добавлено
Или без УФ, обычной покраской (файл _2). Условия аналогичны.
К сообщению приложен файл: 4512955_1.xlsm(30Kb) · 4512955_2.xlsm(30Kb)


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
Сообщениев ячейку вводится слово "крась" и она красится по 3-м значениям справа
"крась" можно вводить сразу в несколько ячеек (с помощью Контрл Ентер или просто копи-пастом)
Красится Условным форматированием. Шрифт красится в тот же цвет, чтобы не видно было.
Если в ячейке что-то другое (или ничего), то УФ убивается.

===========
Добавлено
Или без УФ, обычной покраской (файл _2). Условия аналогичны.

Автор - _Boroda_
Дата добавления - 16.03.2016 в 23:51
карандаш Дата: Четверг, 17.03.2016, 00:44 | Сообщение № 10
Группа: Проверенные
Ранг: Обитатель
Сообщений: 319
Репутация: 7 ±
Замечаний: 20% ±

2010
Файл от Manyasha работает - изменение значения в ячейке сразу приводит к изменению цвета ячеек столбца.
Удаление нескольких строк (уменьшение "высоты столбца") прошло безболезнено - всё продолжило работать

Файлы от _Boroda_ работали, но надо постоянно заносить в ячейки слово "красить".
Кроме этого, попытка удалить нижние десять-двенадцать строк привело к зависанию эксела. Какая из двух предложенных программ - не удалось увидеть, т.к. были открыты все три файла и всё зависло и аварийно завершить пришлось.

Спасибо всем!!! всё работает и можно искать оптимальную палитру

Очень здорово!
 
Ответить
СообщениеФайл от Manyasha работает - изменение значения в ячейке сразу приводит к изменению цвета ячеек столбца.
Удаление нескольких строк (уменьшение "высоты столбца") прошло безболезнено - всё продолжило работать

Файлы от _Boroda_ работали, но надо постоянно заносить в ячейки слово "красить".
Кроме этого, попытка удалить нижние десять-двенадцать строк привело к зависанию эксела. Какая из двух предложенных программ - не удалось увидеть, т.к. были открыты все три файла и всё зависло и аварийно завершить пришлось.

Спасибо всем!!! всё работает и можно искать оптимальную палитру

Очень здорово!

Автор - карандаш
Дата добавления - 17.03.2016 в 00:44
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Задать цвет фона ячейки по значению в ячейке (Формулы/Formulas)
Страница 1 из 11
Поиск:

Яндекс цитирования
© 2010-2016 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!