Преобразование цветовых кодов в VBA
У меня есть куча кода в макросе Excel, который включает в себя следующий шаблон;
Sheet1.Cells(i, 1).Interior.ColorIndex = 4
Sheet1.Cells(j, 1).Interior.ColorIndex = 4
Как видите, я рисую несколько ячеек со значением цвета 4 в моем коде. Но в цветовой палитре есть только 56 цветов, которые я могу использовать. Я хотел бы преобразовать код, чтобы использовать формат RGB (R, G, B), который позволит мне использовать более 56 цветов.
Кто-нибудь знает, как правильно преобразовать мой код? Спасибо...
1 ответ
Решение
Чтобы использовать RGB, вы просто используете
Sheet1.Cells(i, 1).Interior.Color = RGB(0,255,0)
Затем вы можете просмотреть этот сайт, который показывает вам индекс цвета, HEX и RGB эквивалент каждого
http://dmcritchie.mvps.org/excel/colors.htm
Итак, в приведенном выше примере это так же, как Color.Index 4
(Зеленый)