主题：浏览器打开EXCEL报表,如何关闭

Excel报表是不是应该先不用打开，静默报表就行了。当需要查看的时候，再打开就行

比如说

.Build() '后台产生报表

.Save() '保存

.Preview() '预览

.Print() '直接打印

甚至可以根据现有情况，在打开的情况下不能Build，可以有个

.Close()

这样能行吗？狐老大？

总之，每次打印都打开Excel，让人觉得不伦不类，主要是利用Excel似的

下面的代码可以很好的实现预览功能，但是，预览时不需要生成保镖并保存，并老师们看看怎么改

Dim Book As New XLS.Book(ProjectPath & "Attachments\订单.xls")
Dim file As String = ProjectPath & "Reports\订单.xls"
Book.Build() '生成细节区
Book.Save(file) '保存工作簿

Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open(file)
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
With Ws.PageSetup
    .PaperSize = MSExcel.XlPaperSize.xlPaperA4   '纸张大小
    .CenterHorizontally = True   '页面水平居中
    .CenterVertically = True '页面垂直居中
    .Zoom = False '以下设置将缩印在一页内
    .FitToPagesWide = 1  '按照1页的宽度打印
    .FitToPagesTall = 1  '按照1页的高度打印
End With
App.Visible = True
Ws.PrintPreview
App.Visible=False
wb.save
wb.close
App.Quit

林总，因为生成的文件自始至终就一个，对应着模板文件，这倒不是个问题。就是要预览这个文件，就要保存它，好像太浪费资源。因为Excel文件在保存它之前就可以预览和打印，那么咋们的那个Book.Build()后嫩不能生成个临时文件，只在内存中？这个是很需要的。

谢谢林总，希望这个功能以后可以有