procedure SaveAs(Filename: OleVariant; FileFormat: OleVariant; etc...);
Ex.ActiveWorkBook.SaveAs(SaveAsFileName, 56, etc...);
var FileName: string; begin FileName := 'C:\MonFichier.xls'; // fichier que tu veux obtenir Ex.ActiveWorkBook.SaveAs(Filename); end;