Код:
// Что-то вроде этого..
procedure TForm1.Button1Click(Sender: TObject);
var
v:variant;
begin
v:=CreateOleObject('Excel.Application');
Edit1.Text = v.Worksheets["Sheet1"].Cells[6, 1].Value;
end;
Я не уверен насчёт правильности скобок в выделенной строке, это прийдётся смотреть самому в хелпе.
Насчёт свойств и методов Excel.Application смотри в хелпе к Excel.