Преобразование цветовых кодов в VBA

Question

У меня есть куча кода в макросе Excel, который включает в себя следующий шаблон;

Sheet1.Cells(i, 1).Interior.ColorIndex = 4
Sheet1.Cells(j, 1).Interior.ColorIndex = 4

Как видите, я рисую несколько ячеек со значением цвета 4 в моем коде. Но есть только 56 цветов в палитре, которые я могу использовать. Я хотел бы преобразовать код, чтобы использовать формат RGB (R, G, B), который позволит мне использовать более 56 цветов.

Кто-нибудь знает, как правильно преобразовать мой код? Спасибо...

Answer 1

Чтобы использовать RGB, вы просто используете

Sheet1.Cells(i, 1).Interior.Color = RGB(0,255,0)

Затем вы можете просмотреть этот сайт, который показывает вам индекс цвета, HEX и RGB эквивалент каждого

http://dmcritchie.mvps.org/excel/colors.htm

Итак, в приведенном выше примере это так же, как Color.Index 4 (зеленый)