На главную

Работа с EXCEL из Delphi.

Организация доступа к книге EXCEL из Delphi.

Для взаимодействия с 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

Доступ к ячейке в текущей книге Excel можно осуществить следующим образом:

Для записи значения в ячейку:
MsExcel.Range['B2']:='Привет!';

Для чтения значения из ячейки:
s:=MsExcel.Range['B2'];

где B2 - адрес ячейки.

Или используя стиль ссылок R1C1:
MsExcel.Range[MsExcel.Cells[2, 2]]:='Привет!';

где [2, 2] - координата ячейки.

Вообще, ячейке Excel можно присваивать любое значение (символьное, целое, дробное, дата) при этом Ms Excel установит форматирование в ячейке применяемое по умолчанию.

Платонов А.Н.
25.09.2007



Hosted by uCoz