[Soa Pelaez]

Código Delphi [-]
  XLApp := CreateOleObject('Excel.Application');
  try
    // Hide Excel
    XLApp.Visible := False;
    // Open the Workbook
    XLApp.Workbooks.Open(AXLSFile);

    ....
finally

    For loop := 1 to XLApp.Workbooks.Count Do
         XLApp.Workbooks[1].Close[False];  //False=Cerrar sin guardar, True=Guardar y cerrar

    XLApp.Quit;

      Result := True;
  end;

Probe tu código y aún me queda el proceso de EXCEL abierto, alguna otra idea se los agradecería