FoxClub Forums > Архив конференции по VFP до 2005 года

:: Архив конференции по VFP до 2005 года

• Войти

Палитра в Fox и в Excel
Saratoga Автор Сообщений: 493 Дата регистрации: 02.02.2004	Saratoga 13.03.05 08:30:50 Никто не пробовал экспорт грида из Fox-а в Excel, чтобы еще передать цвет ячеек с минимальными потерями? Собственно сам экспорт реализован, но для полного счастья не хватает переноса цвета ячеек (зачастую цвет ячеек сам по себе несет дополнительную информацию), проблема в том, в Excel другая кодировка палитры... Отредактировано (13.03.05 11:31) ------------------

Saratoga
Автор

Сообщений: 493
Дата регистрации: 02.02.2004

Saratoga

13.03.05 08:30:50

Никто не пробовал экспорт грида из Fox-а в Excel, чтобы еще передать цвет ячеек с минимальными потерями? Собственно сам экспорт реализован, но для полного счастья не хватает переноса цвета ячеек (зачастую цвет ячеек сам по себе несет дополнительную информацию), проблема в том, в Excel другая кодировка палитры...

Отредактировано (13.03.05 11:31)

------------------

Re: Палитра в Fox и в Excel
AleksM Сообщений: 17881 Дата регистрации: 11.11.2003	AleksM 13.03.05 09:58:11 Неужели VBAшная ф-ция RGB() дает другое значение чем фоксовая? И вот это ActiveCell.Interior.Color = RGB(128, 128, 128) закрасит ячейку в другой цвет? ------------------ Лучше переесть, чем недоспать. Не спеши, а то успеешь.

Re: Палитра в Fox и в Excel
Igor Korolyov Сообщений: 34580 Дата регистрации: 28.05.2002	Igor Korolyov 13.03.05 15:35:58 Hi, AleksM! Цитата: Неужели VBAшная ф-ция RGB() дает другое значение чем фоксовая? Нет. Цитата: И вот это ActiveCell.Interior.Color = RGB(128, 128, 128) закрасит ячейку в другой цвет? Конкретно "вот это" - при штатной настройке Excel (и соответственно активной книги) - нет, но в общем случае - да. В Excel используется не собственно RGB цвет, а именно палитра - в ней 56 элементов, и все "прочие" цвета просто заменяются на "наиболее близкий" из имеющихся в палитре. Палитра это свойство книги, заполнять её можно так: loXl.Workbooks(1).Colors(m.ln1) = RGB(x, y, z) Соответственно потом данный цвет будет отображаться без искажений - ну и можно будет в коде не .Color использовать, а .ColorIndex Собственно RGB цвета в Excel используются например для автофигур, а вот для фона ячеек, цвета шрифта, границ - используется палитра. ------------------ WBR, Igor

Re: Палитра в Fox и в Excel

Igor Korolyov

Сообщений: 34580
Дата регистрации: 28.05.2002

Igor Korolyov

13.03.05 15:35:58

Hi, AleksM!

Цитата:
Неужели VBAшная ф-ция RGB() дает другое значение чем фоксовая?

Нет.

Цитата:
И вот это ActiveCell.Interior.Color = RGB(128, 128, 128) закрасит ячейку в другой цвет?

Конкретно "вот это" - при штатной настройке Excel (и соответственно активной книги) - нет, но в общем случае - да.

В Excel используется не собственно RGB цвет, а именно палитра - в ней 56 элементов, и все "прочие" цвета просто заменяются на "наиболее близкий" из имеющихся в палитре.
Палитра это свойство книги, заполнять её можно так:


loXl.Workbooks(1).Colors(m.ln1) = RGB(x, y, z)

Соответственно потом данный цвет будет отображаться без искажений - ну и можно будет в коде не .Color использовать, а .ColorIndex

Собственно RGB цвета в Excel используются например для автофигур, а вот для фона ячеек, цвета шрифта, границ - используется палитра.

------------------
WBR, Igor

Re: Палитра в Fox и в Excel
Saratoga Автор Сообщений: 493 Дата регистрации: 02.02.2004	Saratoga 15.03.05 09:03:20 Спасибо

:: Список Форумов•Список тем•Поиск•Войти

Извините, но у вас нет прав для того, чтобы оставлять сообщения в этом форуме.

On-line: 6 (Гостей: 6)