Feld aus Memokomponente in Excel einfügen

[kevflg]

Hallo zusammen!
Ich schreibe hier ein Berechnungsprogramm das mir jetzt Zwischenergebnisse in ein Excel-Sheet ausgeben soll. (von einem Feld aus ner Memo Komponente)
Hab mich hier schon durch sämtliche Beiträge gekämpft, jedoch nix gefunden... Hier mal die ungefähre Form die ich mir dabei vorgestellt habe:

procedure ...
var oleArray: OleVariant; i,n:integer;
begin
n:=Memobox1.lines.count;
for i=0 to n-1 do
OleArray:=VarArrayCreate([0,n],varVariant);
OleArray[i]:= Memobox1.lines;
ExcelWorksheet1.Range['B3','En'].Value:=OleArray;
end;

Nehme jede Hilfe entgegen und bedanke mich schonmal!
Gruß Kevin