Как преобразовать RGB в цвета Экселя? - VB

Формулировка задачи:

Добавил на форму ColorButton (цветовую палитру), она возвращает цвет немеряно длинным числом (восьмизначным). Могу преобразовать его в RGB.
А вот как его преобразовать в стандартные экселевские цвета, 0-255 (если не ошибаюсь)?
Чтобы можно было использовать в задании цвета:

Selection.Interior.ColorIndex = ???(ColorButton1.color)

(вместо вопроса - искомая функция)
Ничего не получается...

Решение задачи: «Как преобразовать RGB в цвета Экселя?»

textual
                            Листинг программы 
                        
                            ColorButton1.color = Selection.Interior.ColorIndex

Оцени полезность:

14 голосов , оценка 4 из 5

Похожие ответы