prueba con esto:
Código Delphi
[-]
WorkSheet.Range['A'+IntToStr(Fila),'J'+IntToStr(Fila)].Insert(EmptyParam);
donde worksheet está definida como:
Código Delphi
[-]
XlApp: TExcelApplication;
WorkBk : _WorkBook;
WorkSheet : _WorkSheet;
y está creada de la forma:
Código Delphi
[-]
XlApp := TExcelApplication.Create(Application);
XlApp.ConnectKind := ckNewInstance; XLApp.Connect;
XlApp.DisplayAlerts[0] := False;
WorkBk := XLApp.WorkBooks.Add (ruta_ficheroplantilla);
WorkSheet := WorkBk.WorkSheets.Get_Item(1) as _WorkSheet;
espero que te sirva de algo
Kiko