A ver, que creo que me he liado con los nombres de las variables. Es que yo genero un documento con múltiples hojas y parte del código no es mío, así que me lío un poco.
Código Delphi
[-] ExcelApp, WorkBook, WorkSheet: Variant ;
Código Delphi
[-]
try
ExcelApp := CreateOLEObject('Excel.Application') ;
except
MessageDLG('Imposible iniciar Excel',mtError,[mbOK],0) ;
Raise ;
end ;
{$IFDEF IAMDEBUGGING}
ExcelApp.Visible := True ;
{$ENDIF}
ExcelApp.WorkBooks.Add;
ExcelApp.workbooks[1].worksheets[hoja].Activate;
ExcelApp.workbooks[1].worksheets[hoja].name := nombre;
WorkBook := ExcelApp.ActiveWorkBook ; WorkSheet := WorkBook.ActiveSheet;