Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: ActiveX/СОМ/CORBA > Excel Выравнивание в ячейке

Автор: Алкоголик 20.8.2009, 07:25

Код


XLApp := CreateOleObject('Excel.Application');
XLApp.Visible := True;
XLApp.Workbooks.Add(ExtractFilePath(ParamStr(0)) + 'xls.xls');
Sheet := XLApp.Workbooks[1].WorkSheets[1];
sheet.range[RefToCell(9+j, 1+i), RefToCell(9+j, 1+i)]:=AGrid.Cells[i, j];
sheet.range[RefToCell(9+j, 1+i), RefToCell(9+j, 1+i)].Select;
sheet.Selection.HorizontalAlignment := xlCenter;

Ругается на xlCenter. Говорит неизвестный индефикатор. Может что подскажите?
Заранее спасибо.

Автор: Rrader 20.8.2009, 07:52

Подключи модуль ExcelXP

Автор: Алкоголик 20.8.2009, 08:00

Спасибо.