загрузка из excel

[Betty]

ошибку выдаёт

[Stilet]

ошибку выдаёт

На какой строке, в каком коде? (Или ты думаешь что тут телепатов много?)

[pesi]

Ошибка скорей всего от того, что в открываемом документе нет листа с именем Лист1...

var
MsX, Sheet :variant;
begin
MsX:= CreateOleObject('Excel.Application');
 try
  MsX.WorkBooks.open(ExtractFilePath(ParamStr(0))+'1.xls');//открываем документ 1.xls лежащий  в папке с программой 
  MsX.Visible:=true;
//Sheet:=MsX.Sheets.Item['Лист1'];//ссылка на лист с именем Лист1
  Sheet:=MsX.Sheets.Item[1];//или так ссылка на лист под номером 1
  edit1.Text:=Sheet.cells[2, 3].value;
 except
   ShowMessage('Ошибка!');
 end;
end;