Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.05.23;
Скачать: CL | DM;

Вниз

программное выделение ячеек в Excel   Найти похожие ветки 

 
I.Ru.Ru   (2004-05-11 23:16) [0]

Подскажите плиз как программно выделить несколько ячеек в Excel например желтым цветом, а также как программно создать границы ячеек?


 
TUser ©   (2004-05-12 06:13) [1]


> выделить несколько ячеек в Excel например желтым цветом

Т.е. выделить, а потом залить? Range. Потом Interior.ColorIndex Надо запустить в Ёкселе макрос и посмотреть, что он туда напишет.

> как программно создать границы ячеек

Это что значит? У ячеек всегда есть границы.


 
Fedia   (2004-05-12 06:33) [2]

>> как программно создать границы ячеек?
Если под границами в Excel имеется ввиду выделение границ черным цветом, то это можно сделать так:


kl1:=’A1’; kl2:=’B2’;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlEdgeLeft].LineStyle := xlContinuous;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlEdgeLeft].Weight := xlThin;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlEdgeTop].LineStyle := xlContinuous;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlEdgeTop].Weight := xlThin;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlEdgeBottom].LineStyle := xlContinuous;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlEdgeBottom].Weight := xlThin;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlEdgeRight].LineStyle := xlContinuous;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlEdgeRight].Weight := xlThin;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlInsideVertical].LineStyle := xlContinuous;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlInsideVertical].Weight := xlThin;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlInsideHorizontal].LineStyle := xlContinuous;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlInsideHorizontal].Weight := xlThin;


Не говорю, что это идеальный вариант, но он стабильно работает.
Конечно проще всегда смотреть как что-либо делается макросом, а затем пробовать переносить это в свое приложение.


 
evvcom ©   (2004-05-12 08:28) [3]

Смотри [1] по поводу записи в самом Excel макроса.



Страницы: 1 вся ветка

Текущий архив: 2004.05.23;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.054 c
3-1082983490
Stupid
2004-04-26 16:44
2004.05.23
Как получить текст сообщения об ошибке при Query.ExecSQL?


9-1073395130
mixir
2004-01-06 16:18
2004.05.23
Камера & 3D


1-1084203363
Avsam
2004-05-10 19:36
2004.05.23
Скрыть Property в наследнике


14-1083658587
Def_E
2004-05-04 12:16
2004.05.23
Область скходимости функционального ряда


14-1081003193
Красная Майка
2004-04-03 18:39
2004.05.23
Happy Birthday MMP