Código Delphi [-] (ExcelApplication1.ActiveWorkbook.Sheets['Hoja1'] as _WORKSHEET).Name := 'MiHoja';
(ExcelApplication1.ActiveWorkbook.Sheets['Hoja1'] as _WORKSHEET).Name := 'MiHoja';