Текущий архив: 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.025 c
