Форум "Delphi"

Паскаль, Делфи

#0 Deep © 21.06.07 21:13:10 - 22.06.07 11:06:41

Ширина колонок в Excel

формирую отчет из делфи для Excel, надо установить фиксированную длину колонок для диапазона. В самом Excel это выглядит вот так:

Columns("N:IV").ColumnWidth = 30

в делфи пробую так:

ExcelApp.Columns('N:IV').ColumnWidth := 30;

и получаю ошибку "Member not found"

Как решить эту задачку?

#1 Deep © 21.06.07 21:49:03

попробовал следующие варианты

ExcelApp.ActiveWorkbook.Sheets.Item[1].Columns['15:255'].ColumnWidth := 30;

WorkBook.WorkSheets[1].Columns['15:255'].ColumnWidth := 30;


WorkBook.WorkSheets[1].Columns['15:250'].Select;
ExcelApp.Selection.ColumnWidth := 30;

везде OLE-ошибки...

#2 Паша © 22.06.07 10:34:30

выдрал у себя из рабочего кода. собственно, использую для копирования столбцов вправо, для раздвигания таблицы, поскольку при копировании ширина не сохраняецца. это нужно для отчетов типа журнал-ордер по аналитике, поскольку количество столбцов заранее неизвестно. если надо, могу весь модуль дать. собстна код:

vExcel.Cells[Row,Col].Select;
vExcel.Selection.ColumnWidth:= ColumnWidth;

Написать ответ