Delph: Ajouer une feuille à un document excel

Bonjour,
J'ai cherchais par tous main en vain, est ce que une ame charitable peut m'aider??

Je crée un document excel et je voudrait lui ajouter quelques feuilles voici mon code :

FExcel := excel.ApplicationClass.Create();// crée le document
FWorkBook := FExcel.WorkBooks.Add(XlWBATemplate.xlWBATWorksheet); // crée une classeur dans le document ce classeur ne contient qu'une seule feuille???
FWorkSheet := FWorkBook.Sheets[TObject(1)] as WorkSheet;//je récupére l'unique feuille du document

Jusqu'a ici ca se passe bien mais quand j'essaie d'ajouter une deuxieme feuille ca bug !!!

FWorkBook.Sheets.Add(nil, FWorkSheet, TObject(0), XlWBATemplate.xlWBATWorksheet);

quelqu'un peut m'aider please ...

Maure