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

Вход

Регистрация

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

 

= Мир MS Excel/Цвет в HEX и обратно. - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Цвет в HEX и обратно. (Формулы/Formulas)
Цвет в HEX и обратно.
lopter-lopter Дата: Воскресенье, 08.10.2017, 17:58 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 1
Репутация: 0 ±
Замечаний: 0% ±

Excel 2003
Друзяки, нужно в соседней ячейке показать HEX-код цвета заливки первой ячейки. А ещё бывает нужно наоборот — залить первую цветом, если в соседнюю введён HEX-код этого цвета. Как победить?

||#008000|
|#008000||

Версия EXCEL — 2003


Сообщение отредактировал lopter-lopter - Воскресенье, 08.10.2017, 17:59
 
Ответить
СообщениеДрузяки, нужно в соседней ячейке показать HEX-код цвета заливки первой ячейки. А ещё бывает нужно наоборот — залить первую цветом, если в соседнюю введён HEX-код этого цвета. Как победить?

||#008000|
|#008000||

Версия EXCEL — 2003

Автор - lopter-lopter
Дата добавления - 08.10.2017 в 17:58
buchlotnik Дата: Воскресенье, 08.10.2017, 18:16 | Сообщение № 2
Группа: Заблокированные
Ранг: Участник клуба
Сообщений: 3442
Репутация: 929 ±
Замечаний: 20% ±

2010, 2013, 2016 RUS / ENG
Ну, показать цвет можно UDF-кой [vba]
Код
Function HEX_color(cell)
    Application.Volatile
    Dim i&, r&, g&, b&
    i = cell.Interior.Color
    b = i \ 256 ^ 2
    i = i - 256 ^ 2 * b
    g = i \ 256
    r = i - g * 256
    HEX_color = "#" & Format(HEX(r), "00") & Format(HEX(g), "00") & Format(HEX(b), "00")
End Function
[/vba] всё остальное после прочтения Правил форума
 
Ответить
СообщениеНу, показать цвет можно UDF-кой [vba]
Код
Function HEX_color(cell)
    Application.Volatile
    Dim i&, r&, g&, b&
    i = cell.Interior.Color
    b = i \ 256 ^ 2
    i = i - 256 ^ 2 * b
    g = i \ 256
    r = i - g * 256
    HEX_color = "#" & Format(HEX(r), "00") & Format(HEX(g), "00") & Format(HEX(b), "00")
End Function
[/vba] всё остальное после прочтения Правил форума

Автор - buchlotnik
Дата добавления - 08.10.2017 в 18:16
gling Дата: Воскресенье, 08.10.2017, 19:43 | Сообщение № 3
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2519
Репутация: 674 ±
Замечаний: 0% ±

2010
после прочтения

"и выполнения " - далее по тексту.


ЯД-41001506838083
 
Ответить
Сообщение
после прочтения

"и выполнения " - далее по тексту.

Автор - gling
Дата добавления - 08.10.2017 в 19:43
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Цвет в HEX и обратно. (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

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