Foxtable(狐表)用户栏目专家坐堂 → 我做EXCEL报表的一点体会


  共有25766人关注过本帖树形打印复制链接

主题:我做EXCEL报表的一点体会

帅哥哟,离线,有人找我吗?
don
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1812 积分:12999 威望:0 精华:14 注册:2008/10/11 18:07:00
  发帖心情 Post By:2009/4/13 16:18:00 [显示全部帖子]

以下是引用t_fs在2009-4-13 16:12:00的发言:


     想问一下,如若打印日期没有规律时,这个日期怎么设置呢?如我想随机的打印一下某年某月报表,是不是只能用手直接修改的办法了。因为报表中经常会用到一些变量,如果EXCEL报表中能够引用变量值就非常完美了。

    不知老大能否实现在EXCEL报表中,引用狐表中的变量这一功能。否则的话,作为二次开发的软件,提交用户后,再交待用户更改这个日期值,是不安全的。

    EXCEL报表尚未学完,不一定正确,仅供参考。

一开始就能够!

一,引用全局变量

可以在Excel报表中引用全局变量,格式为:

[!全局变量名称]

全局变量可以参与表达式计算,例如:

{"起始日期:" & [!起始日期]}

二,使用标记

利用Marks集合,我们可以在报表模板中插入标记,然后在生成报表的时候,将标记替换为真正的值。

在Excel报表模板中插入一个标记的格式为:

<标记名称>

示例

假定报表中某个位置需要打印出当前登录用户的名称,我们可以在设计报表的时候,在该处插入标记:

<用户名>

标记的名称可以根据需要取。

然后在生成报表之前,利用Marks集合,将标记替换为真正的用户:

Dim Book As New XLS.Book("c:\book5.xls")
Book.Marks.Add(
"用户名",User.Name)
Book.Build()
Book.Save(
"c:\reports\test.xls")
Dim
Proc As New Process
Proc.File =
"c:\reports\test.xls"

Proc.Start()





 回到顶部