如何关闭电子表格book不提示存盘？
代码如下
Dim app As New Excel.Application
Dim book As Excel.Workbook = app.Workbooks.Add
Dim sheet As Excel.Worksheet = CType(book.Worksheets(1), Excel.Worksheet)

…………

book.Close() '关闭
book = Nothing '释放
app.Quit() '退出
GC.Collect() '关闭进程


执行程序时，老提示BOOK1保存，请问如何设置，可以让系统关闭BOOK，不跳出保存对话框？
[解决办法]
book.SaveCopyAs(fileName)
book.Close() '关闭
....