Richedittext nach Excel exportieren ?

[Vader]

hallo,

das ich mich mit einer exceltabelle verbinden habe ich, ich hab auche einen code
der was aus einer zelle einer exceldatei ausliest und in ein editfeld in der form einliest.

Delphi-Quellcode:

private
    { Private-Deklarationen }
FLCID            : Integer;
    procedure CloseExcel;
    function OpenExcel : Boolean;
    function  ReadCell(Row,Col : Integer) : String;




function TForm1.ReadCell(Row, Col: Integer): String;
var
  CellRange : Range;
begin
  CellRange:=ExcelWorksheet1.Cells;
  Result:=CellRange.Item[Row,Col].Value;
end;


procedure TForm1.Ein4Click(Sender: TObject);
begin
spinedit1.text:= '1';
end;


procedure TForm1.Werteauslesen1Click(Sender: TObject);
begin
Edit1.Text:=ReadCell(SpinEdit1.Value,SpinEdit2.Value);
end;

ich würde das umgekehrt brauchen, das der text vom richedit in die zelle der exceltabelle
schreibt ?

mfg vader