以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  在窗口显示和打印Excel报表 如何另存EXCEL报表  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=7709)
--  作者：卟离卟弃
--  发布时间：2010/7/27 15:11:00
--  在窗口显示和打印Excel报表 如何另存EXCEL报表

根据帮助中的例子，试用了一下

     不知道怎么样把窗口中的EXCEL报表另存。。。。。

 

         那位大侠知道方法？？？

小弟先谢过了。。。
--  作者：blackzhu
--  发布时间：2010/7/27 15:29:00
--  
  Book.Save("c:\\reports\\test.xls")
--  作者：卟离卟弃
--  发布时间：2010/7/27 15:45:00
--  

以前试过，我把代码放在窗口按钮中，提示没有声明名称book.
--  作者：blackzhu
--  发布时间：2010/7/27 15:53:00
--  

Dim Book As New XLS.Book(ProjectPath & "Attachments\\出库单.xls") \'打开模板
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Sheet(6,6).Value = "制单人:" & User.Name \'修改模板,加入制单人信息
Book.Build() \'生成细节区
Book.Save("c:\\reports\\test.xls") \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = "c:\\reports\\test.xls"
Proc.Start()

 

基于模板,将此模板保存到你要求的路径,就是另存为了.