How can I avoid the Save Excel dialog when the automation application exits

Question

I have an Excel automation application written in Delphi that accesses this Excel workbook and retrieves it using some internal logic for different data sheets.

It worked great for years in Excel 2003 and 2007.

Recently, some users have Excel 2010. For these users, when my application shuts down, Excel displays a dialog box asking you to save the saved sheet unchanged. The report says about versions of formulas that will be saved in the new 2010 format. Sorry, I do not have exact words, because this is not an English office suite.

How will my application prevent excel 2010 from showing this annoying and useless box?

Most users have Excel 2007, so most of the files that my application should process, regardless of the actual version of Excel of the user using my application, are in this format and will be in the future, so all files are not parameters for migration.

Answer 1

This is the usual procedure for printing an Excel sheet through automation. After some concern that you always opened Excel dialogs, this procedure resolved all the problems:

procedure PrintExcelReport( Const filename : String; sheet : Integer); {- Sheet is counted from 1 and upwards !! } Var App : OleVariant; begin App:= CreateOleObject('Excel.Application'); Try App.Visible:= 0; App.WorkBooks.Open(ExpandUNCFileName(filename),1); // Open read only Try App.ActiveWorkBook.WorkSheets[sheet].Select; App.ActiveWorkBook.ActiveSheet.PrintOut; // Prints active sheet Finally App.ActiveWorkBook.Saved:= 1; App.DisplayAlerts:= 0; App.ActiveWorkBook.Close(SaveChanges:= 0); End; Finally App.Quit; App:= UnAssigned; End; end; 

Adapt it to suit your application.