Для взаимодействия с MS Excel в программе необходимо использовать модуль ComObj:
uses ComObj;
и объявить переменную для доступа к MS Excel следующего типа:
var MsExcel: Variant;
Инициализация переменной Excel в простейшем случае можно осуществить так:
MsExcel := CreateOleObject('Excel.Application');
Создание новой книги:
MsExcel.Workbooks.Add;
Открытие существующей книги (где path - путь к фалу с расширением xls.):
MsExcel.Workbooks.Open[path];
Открытие существующей книги только для чтения:
MsExcel.Workbooks.Open[path, 0, True];
Закрытие Excel:
MsExcel.ActiveWorkbook.Close;
MsExcel.Application.Quit;
Блокировка запросов (подтвеждений, уведомлений) Ms Excel, например, запретить запрос на сохранение файла:
MsExcel.DisplayAlerts:=False;
Отображаем Excel на экране:
MsExcel.Visible := True;
или скрываем:
MsExcel.Visible := False;
Печать содержимого активного листа MS Excel:
MsExcel.ActiveSheet.PrintOut;
Доступ к ячейке в текущей книге Excel можно осуществить следующим образом:
Для записи значения в ячейку:
MsExcel.Range['B2']:='Привет!';
Для чтения значения из ячейки:
s:=MsExcel.Range['B2'];
где B2 - адрес ячейки.
Или используя стиль ссылок R1C1:
MsExcel.Range[MsExcel.Cells[2, 2]]:='Привет!';
где [2, 2] - координата ячейки.
Вообще, ячейке Excel можно присваивать любое значение (символьное, целое, дробное, дата) при этом Ms Excel установит форматирование в ячейке применяемое по умолчанию.
Платонов А.Н.
25.09.2007