Форум » [x]Harbour » excel » Ответить
excel
valery2: Хотелось-бы узнать, есть-ли эффективный ( быстрый ) способ экспорта dbf -> xls? Реальный!
Ответов - 49, стр:
1 2 3 All
Dima: Andrey пишет: clBlue значит надо найти (создать) CH файлик с описанием цветов например из Минигуи [pre2] //----------------------------------------------------------------------------// // Low Intensity colors //----------------------------------------------------------------------------// #define CLR_BLACK 0 // RGB( 0, 0, 0 ) #define CLR_BLUE 8388608 // RGB( 0, 0, 128 ) #define CLR_GREEN 32768 // RGB( 0, 128, 0 ) #define CLR_CYAN 8421376 // RGB( 0, 128, 128 ) #define CLR_RED 128 // RGB( 128, 0, 0 ) #define CLR_MAGENTA 8388736 // RGB( 128, 0, 128 ) #define CLR_BROWN 32896 // RGB( 128, 128, 0 ) #define CLR_HGRAY 12632256 // RGB( 192, 192, 192 ) #define CLR_LIGHTGRAY CLR_HGRAY //----------------------------------------------------------------------------// // High Intensity Colors //----------------------------------------------------------------------------// #define CLR_GRAY 8421504 // RGB( 128, 128, 128 ) #define CLR_HBLUE 16711680 // RGB( 0, 0, 255 ) #define CLR_HGREEN 65280 // RGB( 0, 255, 0 ) #define CLR_HCYAN 16776960 // RGB( 0, 255, 255 ) #define CLR_HRED 255 // RGB( 255, 0, 0 ) #define CLR_HMAGENTA 16711935 // RGB( 255, 0, 255 ) #define CLR_YELLOW 65535 // RGB( 255, 255, 0 ) #define CLR_WHITE 16777215 // RGB( 255, 255, 255 ) [/pre2]
Andrey: Dima пишет: а если искать цвет ячейки excel (поиск по всем словам) то можно попасть вот сюда Не догадался ... Dima пишет: значит надо найти (создать) CH файлик с описанием цветов Да хотелось бы.... Вот есть такие цвета: http://dmcritchie.mvps.org/excel/colors.htm
Dima: Andrey пишет: Да хотелось бы.... Так сделай или найди раз хотелка работает ;)
Dima: гугль рулит http://www.rapidtables.com/web/color/RGB_Color.htm
Andrey: Dima пишет: Так сделай или найди раз хотелка работает ;) Обязательно. Как только задачу закончу...
Andrey: Dima пишет: Так сделай или найди раз хотелка работает ;) Можно проще обходиться ! #include "tsbrowse.ch" oSheet:Cells( nI, 16 ):Interior:Color := RGB(255,255,255) // закраска ячейки белым oSheet:Cells( nI, 16 ):Interior:Color := CLR_HRED // закраска ячейки красным oSheet:Cells( nI, 16 ):Font:COLOR := CLR_HRED или RGB( 255, 0, 0 ) // цвет шрифта в ячейке Все уже готово и писать не надо !
Dima: Andrey пишет: Можно проще обходиться ! А ты не знал ? :)
Andrey: Dima пишет: А ты не знал ? :) Неа .... Меня в первом нашедшем примере смутило что числа задаются числом... А то что есть альтернатива, я как то не подумал...
Dima: Andrey Бывает
полная версия страницы