экспорт в Excel!!!!!!!!!!!!!

← →
golik (2007-06-10 17:28) [0]

как указать формат ячеек?
1. выравнивание по горизонтали и вертикали по центру ?
2. переносить по словам ?
3. как указать высоту строки ?

← →
3fc © (2007-06-15 15:40) [1]

Читай справку по VBA.

---
ExcelApp: TExcelApplication; //страница Servers палитры компонентов
ExcelWbook: TExcelWorkbook; //-/-
ExcelWSheet: TExcelWorksheet; //-/-
---
ExcelApp.Connect; //подключение к COM-серверу: Excel
ExcelWbook.ConnectTo(ExcelApp.Workbooks.Add(EmptyParam, 1)); //добавляем новую книгу
ExcelWSheet.ConnectTo(ExcelWBook.Worksheets.Item[1] as _Worksheet); //ссылка на первый лист книги

with ExcelWSheet.Range["A1", "A1"] do // устанавливаем необходимые св-ва нужного диапазона
begin
ColumnWidth := 17;
RowHeight := 51; //высота строки
NumberFormat := "@"; //текстовый формат ячейки
HorizontalAlignment := xlCenter; //выравнивание по горизонтали: по центру
VerticalAlignment := xlCenter; //выравнивание по вертикали: по центру
WrapText := True; //перенос по словам
Orientation := 0;
AddIndent := False;
IndentLevel := 0;
ShrinkToFit := False;
ReadingOrder := xlContext;
MergeCells := False;
end;

ExcelApp.Visible[1] := True; //показать Excel
---

← →
sniknik © (2007-06-15 15:43) [2]

> 1. 2. 3.
универсальный метод - записать в самом экселе макрос по нужным действиям и посмотреть сгенерированный код.

← →
YurikGL © (2007-06-15 22:00) [3]

Врод сюда ходят в этом случае... http://www.delphikingdom.com/asp/itemq.asp?mode=1&ItemID=2.

← →
Satyavan (2007-06-16 11:04) [4]

Смотрите сайт
http://programmist.nm.ru
Все описано просто и понятно, проще не бывает.

экспорт в Excel!!!!!!!!!!!!! Найти похожие ветки