Главная страница
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.023 c
4-1081423926
Евгения
2004-04-08 15:32
2004.05.23
Как перенести папку


1-1083750540
Alek_1
2004-05-05 13:49
2004.05.23
А как использовать DECIMALDIGITS?


7-1081853748
Ded Moroz
2004-04-13 14:55
2004.05.23
USB-WebCam, S-Video


3-1083241816
kaif
2004-04-29 16:30
2004.05.23
Шмрокое использование вложенного запроса в IN


11-1071840200
Yury Sidorov
2003-12-19 16:23
2004.05.23
KOL и Large fonts