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

Как из делфи объединить ячейки в Excel ?   Найти похожие ветки 

← →
Excel-deplphi   (2003-11-10 07:26) [0]

Работаю из Делфи с Excel-документом через переменную Ех.
К примеру, надо просто объединить три ячейки в документе с Ex.Cells[1,15] по Ex.Cells[1,18].
Как это прописать в делфи?
(вариант типа Ex.Range["F10:H10"].Select;
Ex.Selection.Merge;
не подходит, т.к. ячейки и столбцы могут меняться в цикле)

---

← →
Романов Р.В. ©   (2003-11-10 08:19) [1]

function SetRange(WorkBook: OleVariant; y1, x1, y2, x2: Integer): OleVariant;
begin
Result := WorkBook.WorkSheets[1].Range[
WorkBook.WorkSheets[1].Cells[y1, x1],
WorkBook.WorkSheets[1].Cells[y2, x2]];
end;

SetRange(WorkBook, 2, 1, 2, 6).MergeCells := True;

---

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

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



Память: 0.44 MB
Время: 0.015 c