AXForum  
Вернуться   AXForum > Microsoft Dynamics AX > DAX: Программирование
All
Забыли пароль?
Зарегистрироваться Правила Справка Пользователи Сообщения за день Поиск Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
Старый 28.05.2008, 17:38   #1  
Poleax is offline
Poleax
Модератор
Аватар для Poleax
MCP
MCBMSS
Злыдни
 
1,353 / 595 (22) +++++++
Регистрация: 17.02.2005
Адрес: msk
Записей в блоге: 34
;) ColorFillCells в Excel документе
Создаю отчет Екселевский.
Есть метод ColorFillCells(Номер ячейки, сolorIndeх)

Кто знает градацию цветов для сolorIndeх?

Последний раз редактировалось Poleax; 28.05.2008 в 17:41.
Старый 28.05.2008, 17:52   #2  
Gustav is offline
Gustav
Moderator
Аватар для Gustav
SAP
Лучший по профессии 2009
 
1,858 / 1152 (42) ++++++++
Регистрация: 24.01.2006
Адрес: Санкт-Петербург
Записей в блоге: 19
В хелпе Excel 2000 про ColorIndex
Миниатюры
Нажмите на изображение для увеличения
Название: ColorIndex.jpg
Просмотров: 443
Размер:	72.6 Кб
ID:	3464  
Старый 28.05.2008, 17:54   #3  
Poleax is offline
Poleax
Модератор
Аватар для Poleax
MCP
MCBMSS
Злыдни
 
1,353 / 595 (22) +++++++
Регистрация: 17.02.2005
Адрес: msk
Записей в блоге: 34
Gustav
Спасибо, чет я туда и не заглянул.
Старый 28.05.2008, 18:10   #4  
Gustav is offline
Gustav
Moderator
Аватар для Gustav
SAP
Лучший по профессии 2009
 
1,858 / 1152 (42) ++++++++
Регистрация: 24.01.2006
Адрес: Санкт-Петербург
Записей в блоге: 19
Хм... а самое смешное, что в 2003 я что-то подобной картинки не вижу...
И еще по своему опыту знаю, что мне всегда хотелось иметь на эти случаи красивые пацанские константы типа xlRed или xlLightYellow, ан не нашёл я их чего-то в Excel... И макрорекордер сам тоже тупо пишет конкретные литеральные цифры.

P.S. Поискал в Сети. Люди в мире тоже озабочены и, как выяснилось, пишут этот енум сами:

http://www.ozgrid.com/forum/showthread.php?t=53791
Код:
 'ColorIndex Enumeration
Public Enum Color 
    Aqua = 42 
    Black = 1 
    Blue = 5 
    BlueGray = 47 
    BrightGreen = 4 
    Brown = 53 
    Cream = 19 
    DarkBlue = 11 
    DarkGreen = 51 
    DarkPurple = 21 
    DarkRed = 9 
    DarkTeal = 49 
    DarkYellow = 12 
    Gold = 44 
    Gray25 = 15 
    Gray40 = 48 
    Gray50 = 16 
    Gray80 = 56 
    Green = 10 
    Indigo = 55 
    Lavender = 39 
    LightBlue = 41 
    LightGreen = 35 
    LightLavender = 24 
    LightOrange = 45 
    LightTurquoise = 20 
    LightYellow = 36 
    Lime = 43 
    NavyBlue = 23 
    OliveGreen = 52 
    Orange = 46 
    PaleBlue = 37 
    Pink = 7 
    Plum = 18 
    PowderBlue = 17 
    Red = 3 
    Rose = 38 
    Salmon = 22 
    SeaGreen = 50 
    SkyBlue = 33 
    Tan = 40 
    Teal = 14 
    Turquoise = 8 
    Violet = 13 
    White = 2 
    Yellow = 6 
     '    Blue = 32 'duplicate of 5
     '    DarkBlue = 25 'duplicate of 11
     '    DarkRed = 30 'duplicate of 9
     '    LightTurquoise = 34 'duplicate of 20
     '    Pink = 26 'duplicate of 7
     '    Plum = 54 'duplicate of 18
     '    Teal = 31 'duplicate of 14
     '    Turquoise = 28 'duplicate of 8
     '    Violet = 29 'duplicate of 13
     '    Yellow = 27 'duplicate of 6
End Enum
http://www.vbforums.com/showthread.php?t=380919
Код:
1. Public Enum Colour  'Colours list
2.     None = -4142
3.     Black = 1
4.     White = 2
5.     Red = 3
6.     BrightGreen = 4
7.     Blue = 5
8.     Yellow = 6
9.     Magenta = 7
10.     Cyan = 8
11.     DarkRed = 9
12.     Green = 10
13.     DarkBlue = 11
14.     DarkYellow = 12
15.     Violet = 13
16.     Teal = 14
17.     Grey25 = 15
18.     Grey50 = 16
19.     Lilac = 17
20.     Cream = 19
21.     DarkViolet = 21
22.     Pink = 22
23.     MidBlue = 23
24.     PaleLavender = 24
25.     SkyBlue = 33
26.     LightCyan = 34
27.     LightGreen = 35
28.     LightYellow = 36
29.     PaleBlue = 37
30.     Rose = 38
31.     Lavender = 39
32.     Tan = 40
33.     LightBlue = 41
34.     Aqua = 42
35.     Lime = 43
36.     Gold = 44
37.     LightOrange = 45
38.     Orange = 46
39.     BlueGrey = 47
40.     Grey40 = 48
41.     DarkTeal = 49
42.     SeaGreen = 50
43.     DarkGreen = 51
44.     Olive = 52
45.     Brown = 53
46.     Plum = 54
47.     Indigo = 55
48.     Grey80 = 56
49. End Enum
В первом примере отсортировано по возрастанию названий, во втором - по возрастанию значений. Имена констант соответствует тексту всплывающей подсказки в английской версии Excel (конечно, без пробелов и %) при наводе мыши на элемент раскрывающейся палитры пиктограмм "Цвет заливка" или "Цвет шрифта". Кстати, в выпадающей палитре всего 40 цветов, т.е. не все из 56 там присутствуют. И отсутствующие в 40-цветной палитре фантазиями авторов примеров называются по-разному: например, 17: PowderBlue = 17 и Lilac = 17.
За это сообщение автора поблагодарили: decoder (1).
Старый 28.05.2008, 18:55   #5  
Poleax is offline
Poleax
Модератор
Аватар для Poleax
MCP
MCBMSS
Злыдни
 
1,353 / 595 (22) +++++++
Регистрация: 17.02.2005
Адрес: msk
Записей в блоге: 34
Попробывал цвета. Не все оказываются соответствуют тем что на картинке..
Некоторые номера отличаются по результату.
По названию если только ориентироваться, и то пока не попробуешь смутно представляешь как какой он цвет из себя.
Проще саму себе отчет написать и цвета по ячейкам раставить по циклу ;-)
Старый 29.05.2008, 14:27   #6  
Владимир Максимов is offline
Владимир Максимов
Участник
КОРУС Консалтинг
 
1,662 / 1168 (42) ++++++++
Регистрация: 13.01.2004
Записей в блоге: 3
Как правило, в Excel есть аналогичный метод, позволяющий передать RGB() значение. По полученному значению Excel сам, автоматически, определит ближайших похожий ColorIndex.

Обычно такие методы называются просто Color().

Например, для задания цвета фона ячейки можно записать так:

Range.Interior.Color = RGB(0,255,0)
Старый 30.05.2008, 13:49   #7  
Gustav is offline
Gustav
Moderator
Аватар для Gustav
SAP
Лучший по профессии 2009
 
1,858 / 1152 (42) ++++++++
Регистрация: 24.01.2006
Адрес: Санкт-Петербург
Записей в блоге: 19
Набрёл на интересную ссылку: http://www.mvps.org/dmcritchie/excel/colors.htm
В числе прочего там есть табличка представления цветов для ColorIndex через параметры функции RGB для Color:
Код:
Color		Red	Green	Blue
-------------------------------------
[Black]		0	0	0
[White]		255	255	255
[Red]		255	0	0
[Green]		0	255	0
[Blue]		0	0	255
[Yellow]	255	255	0
[Magenta]	255	0	255
[Cyan]		0	255	255
[Color 9]	128	0	0
[Color 10]	0	128	0
[Color 11]	0	0	128
[Color 12]	128	128	0
[Color 13]	128	0	128
[Color 14]	0	128	128
[Color 15]	192	192	192
[Color 16]	128	128	128
[Color 17]	153	153	255
[Color 18]	153	51	102
[Color 19]	255	255	204
[Color 20]	204	255	255
[Color 21]	102	0	102
[Color 22]	255	128	128
[Color 23]	0	102	204
[Color 24]	204	204	255
[Color 25]	0	0	128
[Color 26]	255	0	255
[Color 27]	255	255	0
[Color 28]	0	255	255
[Color 29]	128	0	128
[Color 30]	128	0	0
[Color 31]	0	128	128
[Color 32]	0	0	255
[Color 33]	0	204	255
[Color 34]	204	255	255
[Color 35]	204	255	204
[Color 36]	255	255	153
[Color 37]	153	204	255
[Color 38]	255	153	204
[Color 39]	204	153	255
[Color 40]	255	204	153
[Color 41]	51	102	255
[Color 42]	51	204	204
[Color 43]	153	204	0
[Color 44]	255	204	0
[Color 45]	255	153	0
[Color 46]	255	102	0
[Color 47]	102	102	153
[Color 48]	150	150	150
[Color 49]	0	51	102
[Color 50]	51	153	102
[Color 51]	0	51	0
[Color 52]	51	51	0
[Color 53]	153	51	0
[Color 54]	153	51	102
[Color 55]	51	51	153
[Color 56]	51	51	51
P.S. Несколько странные на первый взгляд промежуточные значения типа 51, 102, 153, 204 на самом деле просто кратные 20% доли от числа 255: 20%, 40%, 60% и 80% соответственно. 128 и 192 - практически 50% и 75%. В связи с этим открытием круглое число 150 для [Color 48] выглядит неожиданно, хотя, возможно, просто описка вместо "обоснованного" 153.
За это сообщение автора поблагодарили: Poleax (1), driller (2), SuperStar88 (1).
 

Похожие темы
Тема Автор Раздел Ответов Посл. сообщение
Исследование скорости экспорта данных из Axapta в Excel (коллективный эксперимент) Gustav DAX: База знаний и проекты 79 13.02.2014 13:18
gl00mie: Read Excel table via ADO Blog bot DAX Blogs 2 09.04.2010 08:32
[Excel] - Несколько версий Excel на машине клиента Андре DAX: Программирование 11 07.08.2007 13:45
Вызов Item() для коллекций Excel Владимир Максимов DAX: Программирование 15 17.08.2006 19:47
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход

Рейтинг@Mail.ru
Часовой пояс GMT +3, время: 12:33.
Powered by vBulletin® v3.8.5. Перевод: zCarot
Контактная информация, Реклама.