Du findest unter
www.delphi-forum.de/...&highlight=excel in diesem Forum ein kleines Besipiel für Excel starten, Daten einfügen und beenden.
Mit
Showmessage(Memo1.Lines.CommaText);
bekommst Du alle Zeilen mit Komma getrennt.
Wenn Du sie Zeilenweise übertragen möchtestes, musst Du eine Schleife bauen:
FOR zaehler:=0 TO Memo1.Lines.Count-1 DO Showmessage(Memo1.Lines[zaehler]);
Diese Beispiele zeigen nur die Ausgabe am Bildschirm. Ersetzte die Ausgabe durch eine Excelausgabe wie:
zeile:=1;
spalte:=1;
FOR zaehler:=0 TO Memo1.Lines.Count-1 DO Worksheet.Cells.Item[zeile+zaehler,spalte]:=Memo1.Lines[zaehler]);