Имя: Пароль:
1C
1С v8
Как соотнести "цвет" 1С и Экселе?
0 mzelensky
 
24.08.12
11:39
Доброго всем!
Есть определенный "цвет" в 1С-ке. Хочу этим же цветом (ну или максимально близким) разукрасить ячейку в экселе...как это сделатЬ?

Понятно что задать цвет в экселе не проблема:

Лист.Cells(6, СчКолонка).Interior.ColorIndex

Но как привести в соответствие? Например "36" желтый, "40" рыжий ...
1 Aleksey
 
24.08.12
11:44
Цвет текста задается не в каком-либо формате (RGB, CMYK и т.д.), а номером, под которым он находится в палитре Excel. Всего в палитре присутствует 55 цветов и одно значение отводиться под автоцвет. Итого при помощи свойства ColorIndex() можно задать 56 значений цвета. Эти 55 цветов находятся в коллекции Colors объекта ActiveWorkbook, так что их можно при желании изменить:



ActiveWorkbook.Colors(1) = RGB(153, 202, 60)

Cells(1, 1).Interior.ColorIndex = 1
2 + 2 = 3.9999999999999999999999999999999...