Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.021 c