бд эксель

Привет всем помогите пожалуйста а то стопронулся и не знаю что делать.
Суть такая есть база экселя (2007) в ней 2 листа и в делфи форма на ней эдит. Надо програмно при вводе в эдит находит совпадение на первом листе и вырезает из него во второй лист. после всего сохраняет базу без всяких запросов на подтверждение сохранения. И еще один аспект нужно чтобы можно было сразу вводить еще раз в эдит (т.е. надо все закрыть правильно). Буду очень признателен в ответах. Если можно кидайте коды проги, заранее спасибо!!!





Код:

procedure TForm4.N5Click(Sender: TObject);
var Excel,WorkSheets,WorkBook,Sheet: Variant;
x,r,j,i:integer;

begin
Excel:=CreateOleObject('Excel.Application');
Excel.Workbooks.Open('Книга1.xlsx');
x:=Excel.Worksheets[1].usedrange.Rows.count; //кол-во строк
i:=Excel.Worksheets[2].usedrange.Rows.count;
for R:= 1 to x do
begin
if Excel.WorkSheets[1].Cells[r,2].value=edit1.Text
then begin

for j:=1 to 12 do
Excel.WorkSheets[1].Cells[r,j]...........................

end;
end;




помогите пожалуйста вот код не получается у меня сделать.