以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何在XLS模板文件中加入一个变量?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=51072)

--  作者:瞩望星空
--  发布时间:2014/5/19 11:30:00
--  如何在XLS模板文件中加入一个变量?

设计好报表模板后,可以通过窗口中的按钮来生成Excel报表,以下是代码:(引用帮助中的例子)


Dim Book As New XLS.Book(ProjectPath & "Attachments\\出库单.xls")
Dim
fl As String = ProjectPath & "Reports\\出库单.xls"
Book.Build()
\'生成细节区
Book.Save(fl)
\'保存工作簿
Dim
Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()


现在我想把当前窗口的一个文本框的内容也打印到这个文件,请问模板文件(出库单.xls)应该如何改?

假定文本框的名称为:cj

要把CJ.text 打印到第一行,第一列中。


 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:出库单.xls


[此贴子已经被作者于2014-5-19 11:33:36编辑过]

--  作者:Bin
--  发布时间:2014/5/19 11:32:00
--  
采用引用VAR变量的方式http://www.foxtable.com/help/topics/1391.htm

或者直接赋值的方式


--  作者:有点甜
--  发布时间:2014/5/19 11:34:00
--  

 用全局变量,然后绑定给文本框,然后再模板里使用

 

http://www.foxtable.com/help/topics/0325.htm 

 

http://www.foxtable.com/help/topics/1391.htm

 


--  作者:瞩望星空
--  发布时间:2014/5/19 12:15:00
--  
可以了,谢谢。我是采用 直接赋值的方式
加入了以下二行:
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Sheet(0,0).Value =   cj.text  \'写入变量

[此贴子已经被作者于2014-5-19 12:17:07编辑过]