以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请问如何动态的修改excel报表模板  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=62553)
--  作者：affixed
--  发布时间：2015/1/4 14:19:00
--  请问如何动态的修改excel报表模板
请问如何动态的修改excel报表模板
比如，我希望在某个excel模板中动态的在固定位置的单元格内添加入一个程序运行时产生的变量值。
--  作者：affixed
--  发布时间：2015/1/4 14:20:00
--  
我用以下代码做，但没有任何效果。

Dim Book As New XLS.Book(ProjectPath & "Attachments\\12) 订货确认书（格式）.xls") \'打开模板
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Sheet(16,16).Value = "制单人" \'修改模板,加入制单人信息
Book.Build() \'生成细节区
Book.Save(ProjectPath & "reports\\test.xls") \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = ProjectPath & "reports\\test.xls"
Proc.Start()
--  作者：Bin
--  发布时间：2015/1/4 14:23:00
--  
那说明是16,16位置不对
--  作者：有点甜
--  发布时间：2015/1/4 14:51:00
--  

注意位置是否正确，如果不行，就上传具体例子

 

Sheet(16,16).Value = "制单人"