Всем здраствуйте, я новичок передомной стоит такая задача: есть фаилик с расширением .xls который запонен всеми необходимыми данными, но в нем постоянно меняються 4 ячейки, необходимо, с помщью проги их изменять и сохранять в файле, Полазел в инете нашел подходящий код, но что то не так :
Код:
procedure TForm1.Button4Click(Sender: TObject);
var
XL, WB, Sheet : Variant;
begin
XL := CreateOLEObject('Excel.Application');
XL.Application.EnableEvents := false;
WB := XL.Workbooks.Add('C:\ARB\Doc\WorkBook.xls');
Sheet := WB.ActiveSheet;
DateTimePicker1.date:= Sheet.Cells[4, 1];
Edit1.Text:= Sheet.Cells[12, 91];
Edit2.Text:= Sheet.Cells[15, 20];
Edit3.Text:= heet.Cells[19, 91];
XL.Quit;
end;
Admin: Не забываем про теги!
Подскажите что не так делаю, и как реализовываеться сохранение фаила, если можно поподробней, заранее спасибо...