von Memo zu Excel

[Linkat]

Hallo,
ich möchte aus einem Delphi-Programm über Clipboard in eine Excel-Tabelle kopieren.
Prinzipiell funktioniert das so:

Delphi-Quellcode:

uses Clipbrd;
procedure TForm1.StartClick(Sender: TObject);
var i              :integer;
    delimiter      :char;
begin
  Memo1.Lines.clear;
  delimiter:=';';                {,;# blank Tab schon probiert}
  for i:=0 to 100 do
  begin
    Memo1.Lines.Add(IntToStr(i)+delimiter+IntToStr(i*i));
  end;
  Memo1.SelectAll;
  Memo1.CopyToClipboard;
end;

Dann in eine Excel Tabelle öffnen und mit <ctrl> v einfügen.
Das Problem ist, dass alles in die erste Spalte kopiert wird.
Wie kann ich erreichen, dass die einzelnen Wörter jeweils in
eine Zelle geschrieben werden?


Vielen Dank!