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

Вниз

Delphi & Excel   Найти похожие ветки 

← →
Лана Розанова   (2003-04-09 12:48) [0]

Как из Delphi в Excel обрамить ячейку?
СПАСИБО!!!

---

← →
Hooch ©   (2003-04-09 13:13) [1]

// бордюр внешний
Range.Borders[xlDiagonalDown].LineStyle := xlNone;
Range.Borders[xlDiagonalUp ].LineStyle := xlNone;

Range.Borders[xlEdgeLeft].LineStyle := xlContinuous;
Range.Borders[xlEdgeLeft].Weight := xlMedium;
Range.Borders[xlEdgeLeft].ColorIndex := xlAutomatic;

Range.Borders[xlEdgeTop].LineStyle := xlContinuous;
Range.Borders[xlEdgeTop].Weight := xlMedium;
Range.Borders[xlEdgeTop].ColorIndex := xlAutomatic;

Range.Borders[xlEdgeBottom].LineStyle := xlContinuous;
Range.Borders[xlEdgeBottom].Weight := xlMedium;
Range.Borders[xlEdgeBottom].ColorIndex := xlAutomatic;

Range.Borders[xlEdgeRight].LineStyle := xlContinuous;
Range.Borders[xlEdgeRight].Weight := xlMedium;
Range.Borders[xlEdgeRight].ColorIndex := xlAutomatic;

// бордюр внутренний
Range.Borders[xlDiagonalDown].LineStyle := xlNone;
Range.Borders[xlDiagonalUp ].LineStyle := xlNone;

Range.Borders[xlEdgeLeft].LineStyle := xlContinuous;
Range.Borders[xlEdgeLeft].Weight := xlMedium;
Range.Borders[xlEdgeLeft].ColorIndex := xlAutomatic;

Range.Borders[xlEdgeTop].LineStyle := xlContinuous;
Range.Borders[xlEdgeTop].Weight := xlMedium;
Range.Borders[xlEdgeTop].ColorIndex := xlAutomatic;

Range.Borders[xlEdgeBottom].LineStyle := xlContinuous;
Range.Borders[xlEdgeBottom].Weight := xlMedium;
Range.Borders[xlEdgeBottom].ColorIndex := xlAutomatic;

Range.Borders[xlEdgeRight].LineStyle := xlContinuous;
Range.Borders[xlEdgeRight].Weight := xlMedium;
Range.Borders[xlEdgeRight].ColorIndex := xlAutomatic;

Range.Borders[xlInsideVertical].LineStyle := xlContinuous;
Range.Borders[xlInsideVertical].Weight := xlThin;
Range.Borders[xlInsideVertical].ColorIndex := xlAutomatic;
Range.Borders[xlInsideHorizontal].LineStyle := xlContinuous;
Range.Borders[xlInsideHorizontal].Weight := xlThin;
Range.Borders[xlInsideHorizontal].ColorIndex := xlAutomatic;

где Range - Ячейка

---

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

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

Наверх

Память: 0.47 MB
Время: 0.017 c